in reply to skiping to the next dir using File::Find;
Just a quick comment.
In your example, you are testing for "-d", and within that
condition you are testing again for "-f". That, of course,
cannot work. Maybe you should adjust your algorithm.
Cheers
cchampion