So if you do go ahead with the module File::Find::Rule should fit in nicely.## UNTESTED ## use File::Find::Rule; my $dest = shift; # just needs case-insensitivity ... my $rule = File::Find::Rule->new(); my @files = $rule->file() ->not( $rule->new->(name => '*.obj') ) ->exec( \&foo ) ->in( $dest );
_________
broquaint
In reply to Re: module design musings: File::CopyTree
by broquaint
in thread module design musings: File::CopyTree
by John M. Dlugosz
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |