in reply to Which witch is the quicker witch?

Perhaps the readdir and stat will be better than your current approach. See:

perldoc -f readir
perldoc -f stat

[download]
Platform independent as well. hth.
--
bm

In Section Seekers of Perl Wisdom