http://qs321.pair.com?node_id=325151


in reply to An alternative to File::Find

Man... if you're gonna suggest something like this, at least make your find command:
"find . -type d -print0 |"
and then in your perl, set
local $/ = "\0";
This is exactly the sort of thing that gives perl a bad rep... it's basically no harder to use print0 and $/="\0", yet you don't do it. It's like people not checking the return value of malloc, for cryin out loud!
------------ :Wq Not an editor command: Wq