Help for this page
use strict; use Archive::Zip qw( :ERROR_CODES :CONSTANTS ); ... } $newzip->writeToFileNamed( $newfile ) == AZ_OK or die 'error somewhere +';