Select Code to Download

             Rate primes_all         ch         jg    ch_opt2
primes_all 1.75/s         --       -96%       -97%       -97%
...
jg         51.9/s      2869%         4%         --        -8%
ch_opt2    56.2/s      3117%        13%         8%         --

#! /usr/bin/perl
use warnings;
...
print'
        });
';

sub primes_opt_till_79 {
    my $n = shift;
...
    return @primes
}

                  Rate
primes_original 74.2/s
...
opt_till_83      192/s
opt_till_79      193/s