Select Code to Download

Select or download this

00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 2
+3 24 25 26 27 28 29 30 31
00 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 2
+3 24 25 26 27 28 29 30 31
...
C_24to32   199055/s   602%   314%  272%      264%         3%       -- 
+       -0%
C_24to32_2 199055/s   602%   314%  272%      264%         3%       0% 
+        --

Select or download this

#! perl -slw
use strict;
...
    Croboticus=> q[ my @smalls = roboticus( $packed ) ],
    C_24to32_2=> q[ my @smalls = _24to32_2( $packed ) ],
};