您的位置:首页 > 其它

Perl_读入输出gz压缩文件_gzip_gunzip

2012-04-20 10:20 295 查看
Perl_读入输出gz压缩文件_gzip_gunzip

my $fil="/dir/fil.gz";

open IN,"gunzip -c $fil |" or die $!;

open IN,"gzip -dc $fil |" or die $!;


my $out="/dir/out.gz";

open OUT, "| gzip >$out" or die $!;

内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: