使用 Perl 模块 IO::Uncompress::AnyUncompress

Question

我希望使用Perl模块IO：：Uncompress：：AnyUncompress，它记录在这里：http://perldoc.perl.org/IO/Uncompress/AnyUncompress.html。

但是，此文档似乎回避了压缩存档（.zip，.7z）包含压缩文件树的事实。我只想从存档中提取单个文件，而不是完整存档，例如：

my $archivename = 'archive.7z';
my $filetoextract = './bin/file.lib';
my $archive = new IO::Uncompress::AnyUncompress($archivename);
my $filecontent = $archive->extract($filetoextract);

但是，API 似乎没有这样的extract()功能，也没有返回存档中包含的文件列表的函数。

我错过了什么吗？

Answer 1

>IO::Uncompress::AnyUncompress只处理单个压缩字节流。你需要一个模块，如 Archive::Any 、 Archive::Any::Lite 或 Archive::Libarchive::XS 。