如何使用Perl的Archive::Zip从ZIP存档中提取单个文件？

Question

如何使用Perl的Archive::Zip从ZIP存档中提取单个文件？

perlzip

6

我有一个名为 X 的 zip 文件，想要提取其中的一个文件，该文件位于 x/x/x/file.txt。如何使用 Perl 的 Archive::Zip 模块实现这个操作？

- Lexicon

2个回答

4

请参见 Archive::Zip::FAQ 中的“从 Zip 中提取文件”。示例文件的当前版本可在线访问 http://cpansearch.perl.org/src/ADAMK/Archive-Zip-1.30/examples/extract.pl。

- daxim

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- codaddict · Accepted Answer

你可以使用 extractMember 方法：

extractMember( $memberOrName [, $extractedName ] )

提取给定的成员，或匹配其名称并提取它。如果该成员不存在于此Zip文件中，则返回undef。如果提供了可选的第二个参数，请将其用作提取成员的名称。否则，成员的内部文件名将用作提取文件或目录的名称。如果传递了$extractedName，则它应该是本地文件系统格式。将创建所有必要的目录。成功时返回AZ_OK。