Help for this page

Select Code to Download


  1. or download this
     print qq{$1\n}
       if ($lines[ $lineNo ] =~ m{\Q$Phrase\E\s*(\d*)});