use Compress::Zlib;
my $gz = deflateInit() || warn "Could not create zlib deflation stream: $!\n";
open (LOGFILE, $gz->deflate("$system_config{sendmail_log_dir}$_")) || warn "Cannot open deflated logfile for reading: $!\n";