in reply to Re: multiple dir. grep
in thread multiple dir. grep

That's a little quick and dirty, since I don't closedir at all,

Use a lexical dirhandle and perl will close it for you. 

perl -le"print for sort  grep!/^\.\.?/, map{ opendir my($DIR), $_; rea
+ddir $DIR } map glob, @ARGV" ./*

[download]
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
Lingua non convalesco, consenesco et abolesco.
Rule 1 has a caveat! -- Who broke the cabal?

In Section Seekers of Perl Wisdom