Open Zip from URL (OpenFromWeb)

Open a .zip from a URL and unzip.

Download Chilkat Perl Module

use chilkat;

$zip = new chilkat::CkZip();

#  Any string unlocks the component for the 1st 30-days.
$success = $zip->UnlockComponent("Anything for 30-day trial");
if ($success != 1) {
    print $zip->lastErrorText() . "\n";
    exit;
}

#  Downloads a .zip into memory and opens it.
$success = $zip->OpenFromWeb("http://www.chilkatsoft.com/testData/hamlet.zip");
if ($success != 1) {
    print $zip->lastErrorText() . "\n";
    exit;
}

#  It can be unzipped to disk:

$fileCount = $zip->Unzip("c:/temp");
if ($fileCount < 0) {
    print $zip->lastErrorText() . "\n";
    exit;
}

#  Alternatively, individual entries may be unzipped into memory.
#  In this case, it is unzipped into a string:

$addCR = 1;
$entry = $zip->GetEntryByName("hamlet.xml");
if (!($entry eq null )) {
    #  If the file has bare LF line endings, add the CR to get
    #  CRLF line endings.
    $fileContents = $entry->inflateToString($addCR);
    print $fileContents . "\r\n";
}