Select Code to Download

my $extract_file = $start_path . $env . "\\mrf" . $mrf_num . "\\$item"
+;     
            
...
      if($zip->read($extract_file) != AZ_OK) {
         die "Unable to decompress zip file '$extract_file'";
      }

\UPatchCAAGAIAE_B.tar.Z
format error: can't find EOCD signature
        Archive::Zip::Archive::_findEndOfCentralDirectory('Archive::Zi
+p::Archive=HASH(0x1b6bd68)', 'IO::File=GLOB(0x1b6be64)')
        Archive::Zip::Archive::readFromFileHandle('Archive::Zip::Archi
+ve=HASH(0x1b6bd68)', 'IO::File=GLOB(0x1b6be64)', 'R:\Rele
        Archive::Zip::Archive::read('Archive::Zip::Archive=HASH(0x1b6b
+d68)', 'R:\Relfsdfdment\pdsfsdhes\OdsfW\mrf15009\UPatc