Re: [MacPerl-AnyPerl] hash of hashes -> sorting

On Mon, Oct 29, 2001 at 07:37:43PM +0100, allan wrote:
> thanks ronald 
> for the suggestion which looks better but is just as ineffecient as mine
> original. i timed both versions twice traversing 878 files in 1006
> directories of total size 839.441066 MB. both taking 280 secs each time
> around.  to clarify this is how i get the filenames w original code
> embedded (commented)

I tested your code on a directory which contains 29765 files in 2877
directories and it only took 13 seconds.  (I had to fill in use
File::Basename, $delimiter = '/', and the initial call to check_folders(),
of course.)

Perhaps your file system is just very slow?

Ronald