The easiest way is to use find2perl. If there is something available to you, what is the point to reinvent it ;-?

If you are familiar with unix, this makes you feel back to home. It is similar to unix find command, and you will love it.

It is a tool coming with Perl, you can find it under your perl bin directory. On Windows, it is a .bat file. Even on unix, you can use it, as find2perl is faster than the find command.