Help for this page
$ 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