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

check the while loop usage: 

  while(my $line=<$in>){
   if ($line=~/eroare/i){
      print "Found";
   }
 }

[download]

If you tell me, I'll forget.
If you show me, I'll remember.
if you involve me, I'll understand.
--- Author unknown to me

In Section Seekers of Perl Wisdom