Carlo wrote:
> I am compressing an archive using
> use Archive::Zip ;
> use Archive::Zip::Tree;
> and it works but let say that i do not want to compress files
> with extention *.exe.
> so if I am adding a directory
> $zip1->addTree(........
> How can I exclude the files *.exe from the compression.
RTFM:
$zip->addTree( $root, $dest [,$pred] )
$root is the root of the tree of files and directories to
be added
$dest is the name for the root in the zip file (undef or
blank means to use relative pathnames)
$pred is an optional subroutine reference to select files:
it is passed the name of the prospective file or directory,
and if it returns true, the file or directory will be
included. The default is to add all readable files and
directories.
[...]
Supply a suitable third argument to addTree. An example might be
sub { $_[0] !~ /\.exe$/ }
.
Cheers,
Philip
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
