在Zip中附加文本文件

Question

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

我尝试将附加=＆gt; 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。