At 7.40 +0000 2000.01.22, Bart Lateur wrote: >One thing I found out, is that MAcPerl is TERRIBLY slow to simply list >the whole contents of a CD, using File::Find, or using readdir() and the >file operators (-X). I'm talking about *hours*, for just *one* CD. >Actually, I tried to list the contents of a CD, with size and file info, >not more than a few directories with a few hundred files, and I had to >interrupt it after 4 hours. Less than half of the files were processed >in this time. Odd. I have a CD with 856 items (files and folders) and this script runs in one second: #!perl -wl use File::Find; find(sub { push @a, $File::Find::name }, 'Neely:'); print scalar @a; print time - $^T; Some information had been cached (I know this because I am on battery, and on sunsequent runs, the CD did not even bother to spin up :), so I popped in a CD that this machine had never seen before, with 5243 items, and it took 24 seconds. PowerBook G3/400, Mac OS 9, DVD-ROM (I forget what speed it spins CDs at). -- Chris Nandor mailto:pudge@pobox.com http://pudge.net/ %PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6']) # ===== Want to unsubscribe from this list? # ===== Send mail with body "unsubscribe" to macperl-request@macperl.org