Help for this page

Select Code to Download


  1. or download this
    if ($lines{$_] eq $lines2[$_]) {
    
  2. or download this
    $str2 =~ s/./(?:($&)|.)/g;
    
    print map{$_||'*'} $str1 =~ /$str2/