in reply to Re^2: log parser
in thread log parser

readline, perlvar#$.
while ( readline $fh ){
   if( /shabba/ ){
      print "$.:$_\n";
   }
}

[download]

In Section Seekers of Perl Wisdom