- or download this
find ( {
no_chdir => 0,
...
push ( @fileList, $File::Find::name ); # get name with path
}},
$tagLocation );
- or download this
our @dirExclusions = qw( \.
\/LOG(\/|$)
...
push ( @fileList3, $File::Find::name );
}},
$tagLocation );
- or download this
our @dirExclusions = qw( \.
\/LOG(\/|$)
...
my @fileList2;
@fileList2 = $rule->in($tagLocation);
- or download this
our @dirExclusions = qw( \.
\/LOG(\/|$)
...
my @fileList2;
@fileList2 = $rule->in($tagLocation);
- or download this
$rule->or(
$rule->new->directory
->name( qr/(\.|\/LOG(\/|$)|\/cache(\/|$)|\/AVCHD(\/|$))/i )
->prune->discard,
$rule->new->directory);
- or download this
our @de = qw (*.* LOG cache AVCHD);
...
my @fileList2;
@fileList2 = $rule->in($tagLocation);