2013-05-03 111 views
0

我有一個tar.gz文件,其大小爲appx 60 MB ...我需要提取該文件中的tar.gz文件..但是我得到Out Of而使用下面的命令內存錯誤..在perl中提取tar.gz文件

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文件到一個有效的方式在不同的目錄....

+0

我試過使用存檔::焦油以及..以下是代碼..使用存檔::焦油; my $ tar = Archive :: Tar-> new; $ tar-> read('C:/ Srinivas /../../../ Perl/IN/Work/test_sample.xml.tar.gz'); $ tar-> extract();仍然我收到了內存不足的錯誤....欣賞一些迴應... – Srini 2013-05-03 09:05:41

回答