open my $fh, '<', '/var/log/mail.log.0' or die "/var/log/mail.log.0: $!";