Recursive scanner perl script

I was just wondering if anyone had come up with a perl script that would 
be able to do the job of the recursive file finder, but on the command 
line. I have just installed Netjuke and I have about 2000 tracks to 
import, and they are in directories based on artist, so there are about 
250 subdirs. It is excruciatingly slow to do this from the webpage, 
somewhere aroung 5 tracks per minute!



-------------------------------------------------------
This sf.net email is sponsored by: viaVerio will pay you up to
$1,000 for every account that you consolidate with us.
http://ad.doubleclick.net/clk;4749864;7604308;v?
http://www.viaverio.com/consolidator/osdn.cfm