<div>
Your match is not working because .* does not match across line breaks (as exist in your file). &nbsp;If I were you, I would change (.*?) to ([^&lt;]*) in order to match everything up to the end tag: &lt;/sql&gt;. &nbsp;This will match across line breaks. &nbsp;The other option is to add the &quot;s&quot; modifier after the last slash as in:<br />
($input) = $in =~ (/&lt;sql type=&quot;cognos&quot;&gt;(.*?)&lt;\/sql&gt;<wbr />/s);
</div>


<div>
This question has been classified as abandoned and is closed as part of the Cleanup Program. See the recommendation for more details.
</div>


<div>
<div class="content wysiwyg-content">
Hi,<br />
<br />
&nbsp; &nbsp; &nbsp; &nbsp; I want to grep the value presnt inside &lt;sql type=&quot;cognos&quot;&gt; &nbsp;<b>XXXXX</b>&lt;/sql&gt;<br />
in the attached file there are 98 occurences .<br />
I want to grep this value (XXXXX) and push it inside an array .So that that array would contain all the XXXXX .I am attaching the file &lt;model.xml&gt;<br />
my code<br />
my $infile = shift;<br />
open INFILE, &quot;&lt;&quot;, $infile;<br />
$count=0;<br />
<br />
<br />
while ($in = &lt;INFILE&gt;) {<br />
&nbsp; &nbsp; #print if (/&lt;dataSourceRef&gt;.*&lt;\/data<wbr />SourceRef&gt;<wbr />/);<br />
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br />
($input) = $in =~ (/&lt;sql type=&quot;cognos&quot;&gt;(.*?)&lt;\/sql&gt;<wbr />/);<br />
push @array,$input;<br />
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br />
} &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br />
<br />
close INFILE; <br />
print scalar @array ;<br />
print join (&quot;\n&quot;,&quot;@array\n&quot;);<br />
<br />
&nbsp;<a href="https://filedb.experts-exchange.com/incoming/2011/07_w29/477975/model.xml" target="_blank" class="file-inline" title="file containing the pattern to be grepped (1.2 MB)"><svg xmlns="http://www.w3.org/2000/svg" viewBox="0 0 512 512"><path d="M67.508 468.467c-58.005-58.013-58.016-151.92 0-209.943l225.011-225.04c44.643-44.645 117.279-44.645 161.92 0 44.743 44.749 44.753 117.186 0 161.944l-189.465 189.49c-31.41 31.413-82.518 31.412-113.926.001-31.479-31.482-31.49-82.453 0-113.944L311.51 110.491c4.687-4.687 12.286-4.687 16.972 0l16.967 16.971c4.685 4.686 4.685 12.283 0 16.969L184.983 304.917c-12.724 12.724-12.73 33.328 0 46.058 12.696 12.697 33.356 12.699 46.054-.001l189.465-189.489c25.987-25.989 25.994-68.06.001-94.056-25.931-25.934-68.119-25.932-94.049 0l-225.01 225.039c-39.249 39.252-39.258 102.795-.001 142.057 39.285 39.29 102.885 39.287 142.162-.028A739446.174 739446.174 0 0 1 439.497 238.49c4.686-4.687 12.282-4.684 16.969.004l16.967 16.971c4.685 4.686 4.689 12.279.004 16.965a755654.128 755654.128 0 0 0-195.881 195.996c-58.034 58.092-152.004 58.093-210.048.041z"/></svg>model.xml</a>
</div>
</div>


file containing the pattern to be grepped

model.xml

Hi,

        I want to grep the value presnt inside <sql type="cognos">  XXXXX</sql>
in the attached file there are 98 occurences .
I want to grep this value (XXXXX) and push it inside an array .So that that array would contain all the XXXXX .I am attaching the file <model.xml>
my code
my $infile = shift;
open INFILE, "<", $infile;
$count=0;


while ($in = <INFILE>) {
    #print if (/<dataSourceRef>.*<\/dataSourceRef>/);
	
($input) = $in =~ (/<sql type="cognos">(.*?)<\/sql>/);
push @array,$input;
	
}	

close INFILE; 
print scalar @array ;
print join ("\n","@array\n");

 

Your match is not working because .* does not match across line breaks (as exist in your file).  If I were you, I would change (.*?) to ([^&amp;lt;]*) in order to match everything up to the end tag: &amp;lt;/sql&amp;gt;.  This will match across line breaks.  The other option is to add the &amp;quot;s&amp;quot; modifier after the last slash as in:
($input) = $in =~ (/&amp;lt;sql type=&amp;quot;cognos&amp;quot;&amp;gt;(.*?)&amp;lt;\/sql&amp;gt;/s);

This question has been classified as abandoned and is closed as part of the Cleanup Program. See the recommendation for more details.

Pattern match

Hi,

        I want to grep the value presnt inside &amp;lt;sql type=&amp;quot;cognos&amp;quot;&amp;gt;  XXXXX&amp;lt;/sql&amp;gt;
in the attached file there are 98 occurences .
I want to grep this value (XXXXX) and push it inside an array .So that that array would contain all the XXXXX .I am attaching the file &amp;lt;model.xml&amp;gt;
my code
my $infile = shift;
open INFILE, &amp;quot;&amp;lt;&amp;quot;, $infile;
$count=0;


while ($in = &amp;lt;INFILE&amp;gt;) {
    #print if (/&amp;lt;dataSourceRef&amp;gt;.*&amp;lt;\/dataSourceRef&amp;gt;/);
	
($input) = $in =~ (/&amp;lt;sql type=&amp;quot;cognos&amp;quot;&amp;gt;(.*?)&amp;lt;\/sql&amp;gt;/);
push @array,$input;
	
}	

close INFILE; 
print scalar @array ;
print join (&amp;quot;\n&amp;quot;,&amp;quot;@array\n&amp;quot;);

 

Perl is a high-level, general-purpose, interpreted, dynamic programming languages with over 25 years of development. Perl 5 runs on over 100 platforms from portables to mainframes and is suitable for both rapid prototyping and large-scale development projects.  Perl gained widespread popularity as a Common Gateway Interface (CGI) scripting language, in part due to its regular expression and string parsing abilities. In addition to CGI, Perl is used for graphics programming, system administration, network programming, finance, bioinformatics, and other applications.