Help: "find command in windows"

Hi, group, I need to move a perl script from unix to windows. I need to do
something like "find -type f" to list all the file under a directory and
sub-directory, the list will be very big, 200million files.

Now under windows, I will have to use File::Find, and print each file name
by file handler, but it is much slow than the unix command "find", does any
body have a better idea?

Thanks for your help