Help for this page
my $zip = Archive::Zip->new($_);
if ($zip->read($_) == AZ_OK)
for (@list_FTP) { $logger->info("Trying to Unzip : $_"); ... if ($zip->read($_) == AZ_OK) { ...