while ( my $line = <$filelog> ) {