PERL Archive:：Zip格式错误：签名错误
我有一个由Ubuntu中的zip命令创建的zip文件，并由Ubuntu中包含的归档管理器更新 我试图使用PERL读取该归档文件的成员，如下所示：PERL Archive:：Zip格式错误：签名错误,perl,zip,compression,Perl,Zip,Compression,我有一个由Ubuntu中的zip命令创建的zip文件，并由Ubuntu中包含的归档管理器更新 我试图使用PERL读取该归档文件的成员，如下所示： use strict; use Archive::Zip qw( :ERROR_CODES :CONSTANTS ); my $zip = Archive::Zip->new(); unless ( $zip->read( '/home/mohamad/Desktop/VM/vm.zip' ) == AZ_OK ) { die
use strict;
use Archive::Zip qw( :ERROR_CODES :CONSTANTS );
my $zip = Archive::Zip->new();
unless ( $zip->read( '/home/mohamad/Desktop/VM/vm.zip' ) == AZ_OK ) {
die 'read error';
}
my @files = $zip->memberNames();
print join("\n" , @files) ."\n";