Select Code to Download

sub collatz_seq {
    my $input = shift;
...
    $cache[$input] = $result if $input < $max;
    return $result;
}

# Intel i7 laptop, Docker Container, Ubuntu + Perlbrew Perl 5.30.1

...
collatz3_d.pl 1e7   9.170s  (d) c + reduced loop iterations
collatz3_e.pl 1e7   7.681s  (e) d + caching less