Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Unzip
Perl script to unzip a .zip archive into a subdirectory, recreating the tree recursively as it goes. # file: Unzip.pl use chilkat; # Simple example showing how to unzip a .zip file. $zip = new chilkat::CkZip(); $zip->UnlockComponent("anything for 30-day trial"); $success = $zip->OpenZip("exampleData.zip"); if ($success) { # The zip in this example contains these files and directories: # exampleData\ # exampleData\hamlet.xml # exampleData\123\ # exampleData\aaa\ # exampleData\123\hello.txt # exampleData\aaa\banner.gif # exampleData\aaa\dude.gif # exampleData\aaa\xyz\ # Returns -1 if error, otherwise returns the number of files and directories # unzipped. # In this example, Unzip will create the directory "unzipDir" in the current # working directory (if it does not already exist) and unzip into it. $numUnzipped = $zip->Unzip("unzipDir"); printf("numUnzipped = %d\n",$numUnzipped); } else { # Failed to open the .zip archive. $zip->SaveLastError("openZipError.txt"); } |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.