Select Code to Download

Benchmark: running bare, grt, st, each for at least 3 CPU seconds...
      bare:  3 wclk secs ( 3.02 usr +  0.00 sys =  3.02 CPU) @  4.63/s
+ (n=14)
...
bare 4.63/s   -- -55% -70%
st   10.2/s 120%   -- -34%
grt  15.5/s 235%  52%   --

        Rate   st bare  grt
st   18009/s   -- -21% -49%
bare 22661/s  26%   -- -36%
grt  35616/s  98%  57%   --

#!/usr/bin/perl

...

@words=map { ( $_ x 100 ) x 100 } @words;
cmpthese(-3,$test);

This is perl, v5.6.1 built for MSWin32-x86-multi-thread