在perl中提取tar.gz文件

Question

我有一个大小为60 MB的tar.gz文件...我需要提取tar.gz文件中的XML文件..但是我在使用时遇到Out Of Memory错误低于命令..

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

下一个问题的答案：

Out Of Memory while extracting tar.gz file using perl

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