Select Code to Download

$ ./846784.pl
        Rate salva almut
salva  881/s    --  -15%
almut 1037/s   18%    --

#!/usr/bin/perl
use Benchmark "cmpthese";
...
    almut => \&almut,
    salva => \&salva,
});