Cool, code was updated.

BTW, i was suspecting that your benchmark was wrong since you used the same value in the hash (file.html). A quick check showed that it doesn't matter much. Interesting.

This is your code with @arr replaced with @ARGV. The directory has 336 files. (Also, -3 didn't work for me here)

>./benchnom *
Benchmark: timing 5000 iterations of For, Map, Slice...
       For: 10 secs ( 9.94 usr  0.00 sys =  9.94 cpu)
       Map: 21 secs (21.26 usr  0.00 sys = 21.26 cpu)
     Slice:  8 secs ( 7.27 usr  0.00 sys =  7.27 cpu)
38.57u 0.05s 0:38.88 99.3%
> ls -l | wc -l
     336
>perl -v

This is perl, version 5.004_04 built for sun4-solaris
[download]

Similar results were for perl 5.5