If you don't want recursion, don't use File::Find.

As for looking in the "current bin directories", look at my "pathfinder" program from one of my UnixReview columns.

-- Randal L. Schwartz, Perl hacker