Select Code to Download

@arr=('cool','guy','here');
$str1="I am cool";
...
      last;
   }
}

@arr=(cool,guy,here);
$str1="I am cool";
if($str1 =~ m/@arr/){
      print "Matched";
}