xml - 在 perl 中提取 tar.gz 文件

Question

我有一个大小约为 60 MB 的 tar.gz 文件...我需要提取该 tar.gz 文件中的 XML 文件...但是在使用以下命令时出现内存不足错误...

use Archive::Extract;
$TAR_FILE_WORK_PATH='C:\..\..\..\Perl\IN\test_sample.xml.tar.gz';
$WORK_DIR = 'C:\..\..\..\Perl\IN\Work';
my $extract_obj = Archive::Extract->new(archive => $TAR_FILE_WORK_PATH, type => 'tgz');
if (!($extract_obj->extract(to => $WORK_DIR))){
print "Error extracting tar file\n";
}
else {
print "Extracted tar file $LATEST_FILE_NAME successfully";
}

请帮助我以有效的方式将 tar.gz 文件提取到不同的目录....

Answer 1

下一个问题的答案：

使用 perl 提取 tar.gz 文件时内存不足

他们提到使用 PREFER_BIN 可能会有所帮助。