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]