Re: Searching all directories except one

sub findstuff {
  if (-d && $_ eq 'zz') {
    $File::Find::prune = 1;
    return;
  }
  # then other stuff as normal
}
[download]

Beware of code like /$dir/ because you might have inadvertent matches, such as with "jazz" instead of "zz".

Comment on Re: Searching all directories except one Download Code

Replies are listed 'Best First'.
Re^2: Searching all directories except one by Aristotle (Chancellor) on Nov 20, 2002 at 13:42 UTC
But that will dump all directories called `zz`, even if they're not just at the top level. Furthermore, it will also examine the files at the top level, which the original poster didn't want. Makeshifts last the longest.	[reply]