use PerlIO::gzip; #Perl IO
读写gz文件
open FQ,"<:gzip",file1.gz||die"$!"; open FN,">:gzip",file2.gz||die"$!";
合并gz文件
zcat file1.gz file2.gz|gzip >file3.gz
Perl语言读取gz压缩文件
原文：https://www.cnblogs.com/xlij1205/p/10782388.html
