直接使用shell的zmore, zless, zcat打开文件也不错,但是如果gz文件很大,还是应该选择zlib。
#!/usr/bin/perl
use strict;
use Compress::Zlib;
my $gz = gzopen("a.gz", "rb");
while( $gz->gzreadline(my $line) > 0 )
{
chomp $line;
print "$line\n";
}
$gz->gzclose();
exit 0;