See extractTree from Archive::Zip
#!/usr/bin/perl use strict; use warnings; use Archive::Zip qw( :ERROR_CODES :CONSTANTS ); my $zip = Archive::Zip->new(); unless ( $zip->read( 'files.txt.zip' ) == AZ_OK ) { die 'read error'; } # (Linux) root dest $zip->extractTree( '', 'tmp/' );
hth,
PooLpi
In reply to Re: Archive::Zip for unzipping to directory?
by poolpi
in thread Archive::Zip for unzipping to directory?
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |