Help for this page

Select Code to Download


  1. or download this
    Unmatched ( in regex; marked by <-- HERE in m/.*"blah blah ( <-- HERE 
    +blah blah"
    .*/ at blah.pl line 53.
    
  2. or download this
    if ($lhs[0] =~ /.*$rhs.*/)
    {  $matches++;  }
    else {  print "Error: $lhs[0] = $rhs[1] \n"; diff++; }