Perl Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++CMFCDelphiFoxProJavaPerlPHPPythonRubySQL ServerVBScript



Perl Examples

Quick Start
Perl Unicode
Perl Byte Array
Perl Certs
Perl Email
Perl Encryption
Perl FTP
HTML-to-XML
Perl HTTP
Perl IMAP
Perl MHT
Perl MIME
Perl RSA
Perl S/MIME
Perl Signatures
Perl Socket
Perl Spider
Perl Tar
Perl Upload
Perl XML
Perl XMP
Perl Zip

More Examples...
String
Email Object
POP3
SMTP
RSS
Atom
Self-Extractor
Service
PPMD
Deflate
DH Key Exchange
DSA

Unreleased...
Bzip2
LZW
Bz2
Icon

 

 

 

 

 

 

 

Zip Inflate File to String Variable

Inflates a file from within a Zip directly into a string variable.

Download Perl Programming Example Scripts

# file: InflateToString.pl

use chilkat;

# Open a .zip, locate a specific file within the .zip and 
# inflate the contents directly into a string variable.
$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\	
	
	# Forward and backward slashes are equivalent and either can be used..
	$zipEntry = $zip->FirstMatchingEntry("*/hello.txt");
	if (zipEntry != null) 
	{
		$str = new chilkat::CkString();
		$zipEntry->InflateToString2($str);
		printf("File contents:\n%s\n",$str->getString());
	}
	else
	{
		printf("Failed to find hello.txt!\n");
	}
}
else
{
	# Failed to open the .zip archive.
	$zip->SaveLastError("openZipError.txt");
}







 

Need a specific example? Send a request to support@chilkatsoft.com

© 2000-2007 Chilkat Software, Inc. All Rights Reserved.