在Zip中附加文本文件

Question

我在一个文本文件(file.zip中的file.txt)中有zip文件,我想在zip文件外面附加另一个文本文件file.txt.我怎样才能做到这一点？有解决方案吗？

我试图将附加=> 1参数添加到IO :: Compress :: Zip但是zip中的文件被覆盖了..

use IO::Compress::Zip qw(zip $ZipError) ;

$filenameToZip = 'file.txt';
zip $filenameToZip => "file.zip",Append => 1
    or die "zip failed: $ZipError\n";

我是否需要解压缩zip文件,追加/合并两个TXT文件并再次压缩文件？或者有更好的解决方案吗？

Answer 1

我建议使用Archive :: Zip模块而不是低级模块.除非你不知道,否则我希望IO :: Compress :: Zip知道如何进行Zip压缩,但不知道如何操作Zip归档文件.

IO :: Compress :: Zip的文档说:

该模块提供了一个Perl接口,允许将zip压缩数据写入文件或缓冲区.

该模块的主要目的是提供对zip文件和缓冲区的流写入访问.它不是通用文件存档程序.如果这是你想要的,请查看Archive :: Zip.