perl如何读写gz压缩文件

这篇文章主要介绍了perl如何读写gz压缩文件，具有一定借鉴价值，感兴趣的朋友可以参考下，希望大家阅读完这篇文章之后大有收获，下面让小编带着大家一起了解一下。

perl读写gz压缩文件

perl 输入输出文件通常为文本文件，而如果是压缩文件也是可以处理的。与普通文件读写类似，都要获取文件句柄，只是稍有变化。

输入文件句柄：

open IN，"gzip -dc infile.gz|"

输出文件句柄：

open OUT, "| gzip > outfile.gz" or die $!;

也可以用包：PerlIO::gzip

use PerlIO::gzip;   #Perl  IOopen FQ,"<:gzip",file1.gz||die"$!";open FN,">:gzip",file2.gz||die"$!";

合并gz文件

zcat file1.gz file2.gz|gzip >file3.gz

感谢你能够认真阅读完这篇文章，希望小编分享的"perl如何读写gz压缩文件"这篇文章对大家有帮助，同时也希望大家多多支持，关注行业资讯频道，更多相关知识等着你来学习!