Hi Tim:
Thanks very much. You are a few days ahead of me.
The only code I've seen at all is the documentation...
<snipet>
Archive::Zip - Provide an interface to ZIP archive files.
NAME
Archive::Zip - Provide an interface to ZIP archive files.
SYNOPSIS
use Archive::Zip qw( :ERROR_CODES :CONSTANTS );
my $zip = Archive::Zip->new();
my $member = $zip->addDirectory( 'dirname/' );
$member = $zip->addString( 'This is a test', 'stringMember.txt' );
$member->desiredCompressionMethod( COMPRESSION_DEFLATED );
$member = $zip->addFile( 'xyz.pl', 'AnotherName.pl' );
die 'write error' if $zip->writeToFileNamed( 'someZip.zip' ) != AZ_OK;
$zip = Archive::Zip->new();
die 'read error' if $zip->read( 'someZip.zip' ) != AZ_OK;
$member = $zip->memberNamed( 'stringMember.txt' );
$member->desiredCompressionMethod( COMPRESSION_STORED );
die 'write error' if $zip->writeToFileNamed( 'someOtherZip.zip' ) != AZ_OK;
DESCRIPTION
The Archive::Zip module allows a Perl program to create, manipulate, read, and write
Zip archive files.
Zip archives can be created, or you can read from existing zip files. Once created,
they can be written to files, streams, or strings.
Members can be added, removed, extracted, replaced, rearranged, and enumerated. They
can also be renamed or have their dates, comments, or other attributes
queried or modified. Their data can be compressed or uncompressed as needed. Members
can be created from members in existing Zip files, or from existing
directories, files, or strings.
</snipet>
I could tell from this that addFile is the main method, but I was nut sure I
understood everything else going on. (e.g. inflate, deflate, COMPRESSION_STORED
Thanks,
Steve
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META content="MSHTML 5.00.3315.2870" name=GENERATOR></HEAD>
<BODY style="FONT: 8pt Tahoma; MARGIN-LEFT: 2px; MARGIN-TOP: 2px">
<DIV>Hi Tim:</DIV>
<DIV> </DIV>
<DIV> Thanks very much. You are a few days ahead
of me.</DIV>
<DIV>The only code I've seen at all is the documentation...</DIV>
<DIV><snipet></DIV>
<DIV>Archive::Zip - Provide an interface to ZIP archive files.</DIV>
<DIV> </DIV>
<DIV>NAME</DIV>
<DIV> </DIV>
<DIV>Archive::Zip - Provide an interface to ZIP archive files.</DIV>
<DIV> </DIV>
<DIV>SYNOPSIS<BR> use Archive::Zip qw( :ERROR_CODES :CONSTANTS );</DIV>
<DIV> </DIV>
<DIV> my $zip = Archive::Zip->new();<BR>my $member =
$zip->addDirectory( 'dirname/' );<BR>$member = $zip->addString( 'This is a
test', 'stringMember.txt' );<BR>$member->desiredCompressionMethod(
COMPRESSION_DEFLATED );<BR>$member = $zip->addFile( 'xyz.pl',
'AnotherName.pl' );</DIV>
<DIV> </DIV>
<DIV> die 'write error' if $zip->writeToFileNamed( 'someZip.zip' ) !=
AZ_OK;</DIV>
<DIV> </DIV>
<DIV> $zip = Archive::Zip->new();<BR>die 'read error' if $zip->read(
'someZip.zip' ) != AZ_OK;</DIV>
<DIV> </DIV>
<DIV> $member = $zip->memberNamed( 'stringMember.txt'
);<BR>$member->desiredCompressionMethod( COMPRESSION_STORED );</DIV>
<DIV> </DIV>
<DIV> die 'write error' if $zip->writeToFileNamed( 'someOtherZip.zip' )
!= AZ_OK;</DIV>
<DIV> </DIV>
<DIV>DESCRIPTION</DIV>
<DIV> </DIV>
<DIV>The Archive::Zip module allows a Perl program to create, manipulate, read,
and write Zip archive files.</DIV>
<DIV> </DIV>
<DIV>Zip archives can be created, or you can read from existing zip files. Once
created, they can be written to files, streams, or strings.</DIV>
<DIV> </DIV>
<DIV>Members can be added, removed, extracted, replaced, rearranged, and
enumerated. They can also be renamed or have their dates, comments, or other
attributes<BR>queried or modified. Their data can be compressed or uncompressed
as needed. Members can be created from members in existing Zip files, or from
existing<BR>directories, files, or strings.<BR></snipet></DIV>
<DIV> </DIV>
<DIV>I could tell from this that addFile is the main method, but I was nut sure
I understood everything else going on. (e.g. inflate, deflate,
COMPRESSION_STORED </DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV>Thanks,</DIV>
<DIV> </DIV>
<DIV>Steve</DIV>
<DIV> </DIV></BODY></HTML>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]