my $ERRORLINES_IN = File::ReadBackwards->new($logfile) or die "$logfile : $!\n";
while (defined($logline = $ERRORLINES_IN->readline)) {
$logline =~ s/[^[:ascii:]]//g;
$logline =~ s/\0//g;