【发布时间】：2013-05-03 05:21:25
【问题描述】：
我有一个大小约为 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 文件提取到不同的目录....
【问题讨论】：
-
我也尝试过使用 Archive::Tar .. 下面是代码 .. 使用 Archive::Tar;我的 $tar = Archive::Tar->new; $tar->read('C:/Srinivas/../../../Perl/IN/Work/test_sample.xml.tar.gz'); $tar->extract();我仍然遇到内存不足错误......感谢一些回应......