Help for this page

Select Code to Download


  1. or download this
                   Rate  recursive recursive2       eval  iterative   list
    +util
    recursive    1244/s         --        -4%       -68%       -97%      -
    +100%
    ...
    eval         3930/s       216%       203%         --       -91%       
    +-99%
    iterative   42708/s      3332%      3192%       987%         --       
    +-85%
    listutil   281788/s     22544%     21622%      7071%       560%       
    +  --
    
  2. or download this
    use warnings;
    use strict;
    ...
        listutil =>
            sub { sum(@array) == $expect or die },
    });