my $unzip = Archive::Zip->new($zipfile); if ( ( defined($unzip) ) && ( $unzip eq "AZ_OK" ) ) { process zip ... } else { dont process.. $logger->info("error\n"); }