Unzip a .zip Archive

Demonstrates how to open a .zip archive and unzip. The Unzip method extracts the files and directories from a .zip archive and recreates the directory tree rooted at the directory path passed to Unzip.

 Chilkat Perl Module Downloads for Windows, Linux, and MAC OS X

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() . "\r\n";
    exit;
}

$success = $zip->OpenZip("my_files.zip");
if ($success != 1) {
    print $zip->lastErrorText() . "\r\n";
    exit;
}

#  Returns the number of files and directories unzipped.
#  Unzips to /my_files, re-creating the directory tree
#  from the .zip.
$unzipCount = $zip->Unzip("/my_files");
if ($unzipCount < 0) {
    print $zip->lastErrorText() . "\r\n";
}
else {
    print "Success!" . "\n";
}