my $str = 'x' x 1_000_000;
...
cmpthese 100,
...

##</code><code>##

          Rate Threads   Forks
Threads 2.02/s      --     -4%
Forks   2.11/s      5%      --

##</code><code>##

          Rate   Forks Threads
Forks   67.1/s      --    -64%
Threads  189/s    181%      --

(v5.10.1, Ubuntu 8.04 (kernel 2.6.24), string length 100)


          Rate   Forks Threads
Forks   84.7/s      --    -44%
Threads  152/s     79%      --

(v5.12.0, SUSE 11.1 (kernel 2.6.27), string length 10000)