- or download this
my @filelist = ('zip1.zip','zip2.zip','zip3.zip');
- or download this
zip1.zip
-->file1.txt
...
-->file5.txt
-->file6.txt
-->file7.txt
- or download this
bigzip.zip
-->zip1 (dir)
...
---->file5.txt
---->file6.txt
---->file7.txt
- or download this
my $zip = Archive::Zip->new();
foreach (@filelist) {
...
$zip->addMember( $_ );
}
}
- or download this
bigzip.zip
-->file1.txt
...
-->file5.txt
-->file6.txt
-->file7.txt
- or download this
my $x=1;
my $zip = Archive::Zip->new();
...
$x++;
}