Select Code to Download

$ perl -e 'vec( $foo, 63, 1) = 1; print unpack( "b64",$foo),$/'
0000000000000000000000000000000000000000000000000000000000000001

$ perl -e 'vec( $foo, 63, 1) = 1; print scalar reverse(unpack "b64",$f
+oo),$/'
1000000000000000000000000000000000000000000000000000000000000000