Help for this page

Select Code to Download


  1. or download this
      if ($i =~ m/@array2/) {

     print "$i is in array2 - skipping\n";
  2. or download this
    my $regex = "(";
foreach (@array2) {
  $regex .= $_ . "|";
}
$regex .= ")";
  3. or download this
    my $regex = "(";
$regex .= join "|", @array2;
$regex .= ")";