in reply to File::Find limited recursion
There is a prune option to File::Find that should do what you want.
-- Randal L. Schwartz, Perl hacker Be sure to read my standard disclaimer if this is a reply.