while ($record = <INPUTFILE>) {
      $_ = $record;
      if (/$searchString/g) {
         print $record;
         $matchesFound = $matchesFound + 1;
     }
   }