Select Code to Download

            Rate    sort   sort2    loop ternary    List
sort    112734/s      --     -1%    -39%    -48%    -67%
...
loop    185579/s     65%     63%      --    -15%    -46%
ternary 217375/s     93%     91%     17%      --    -37%
List    344926/s    206%    203%     86%     59%      --

use List::Util qw(max);

...
    'List' => sub {assignmax3(@r)},
    'loop' => sub {assignmax4(@r)},
};