Select Code to Download

#!/usr/bin/perl

...
    }
  return res;
}

             Rate   eval reducing  initial       *= listutil   inline
eval      21683/s     --     -84%     -84%     -85%     -85%     -89%
...
*=       144019/s   564%       7%       3%       --      -1%     -26%
listutil 145100/s   569%       8%       4%       1%       --     -25%
inline   194405/s   797%      44%      39%      35%      34%       --