Select Code to Download

# Program : 1
#!/usr/bin/perl
...
if ( grep( /^$match/,@array ) ) {
   print "Matched\n";
}

Output :
Matched

# Program : 2
#!/usr/bin/perl
...
<code>
Output :
Matched

# Program : 3
#!/usr/bin/perl
...
if ( grep( /^$match$/,@array ) ) {
   print "Matched\n";
}