myuserid7 has asked for the wisdom of the Perl Monks concerning the following question:

I made a bad architecture choice and have been cramming tens of thousands of files into one directory. FreeBSD was fine, but the unintended host platform of Linux/NFS is completely locking when I traverse the files with perl.

I'm assuming I'll need to split into directories based on some criteria (probably the last few digits of each file).

My question: what is the most transparent way to do this? I don't suppose there is any module out there that creates directories/distributes files while sitting under perl's native functions?