Select Code to Download

#!/pro/bin/perl -slw

...

    return ($top14, $nxt6, $mid6, $bot6);
    }

and_rshift:    2147883105 => 8193 : 33 : 33 : 33
lshift_rshift: 2147883105 => 8193 : 33 : 33 : 33
...
mixed_assign  434/s        75%         72%           --        -9%    
+      -16%
and_rshift    480/s        94%         90%          10%         --    
+       -8%
lshift_rshift 520/s       110%        106%          20%         8%    
+        --