and getting:my $zip = Archive::Zip->new(); $zip->addFile($renamed_file)->desiredCompressionLevel(0); if( $zip->writeToFileNamed($zip_filename) != AZ_OK ) { print "wr +ite error...$!"; } print "Added $renamed_file to $zip_filename\n"; }
Can't call method "desiredCompressionLevel" on an undefined value at / +home/fds/lang/perl/fdsPerl-20100809/lib/site_perl/5.12.1/Archive/Zip/ +Archive.pm line 249. at /home/fds/lang/perl/fdsPerl-20100809/lib/site_perl/5.12.1/Archive/ +Zip/Archive.pm line 249 Archive::Zip::Archive::addFile('Archive::Zip::Archive=HASH(0x1 +49ff318)', 'vm.don') called at ve.pl line 75
In reply to problem with Archive::Zip by fionbarr
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |