Help for this page

Select Code to Download

Select or download this

my @matches = grep { $names[$_] =~ /$pattern/ || 
   $desc[$_] =~/$pattern/ } 
    0 .. $#names;

Select or download this

my @matches = grep { $names[$_] =~ /$pattern/ || 
   $desc[$_] =~/$pattern/ } 
    0 .. $#desc;