note
davorg
<p>Replace your <tt>grep</tt> line with this:</p>
<code>
my @matches = grep { $names[$i] =~ /$pattern/ } 0 .. $#names;
</code>
-- <br>
<<a href="http://www.dave.org.uk">http://www.dave.org.uk</a>>
<p>
"Perl makes the fun jobs fun<br>
and the boring jobs bearable" - <a href="http://www.manning.com/cross/">me</a></p>
65733
66069