in reply to getting picky with File::Find
I think File::Find::Rule is easier to use so here's my attempt, using glob to get just the abc* directories. This ignores everything below baby/dead directories.
use v5.18; use warnings; use autodie; use File::Find::Rule; my $rule = File::Find::Rule->or( File::Find::Rule->name('baby','dead') ->directory() ->prune() ->discard() , File::Find::Rule->file->name('list.dat') ); my @files = $rule->in( glob('abc*') ); say "****************"; say for @files;
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: getting picky with File::Find::Rule less typing find/rule
by Anonymous Monk on Apr 09, 2014 at 02:37 UTC |
In Section
Seekers of Perl Wisdom