#             1         2         3         4
#    12345678901234567890123456789012345678901234567
perl -e'$_=sprintf"%b",pop;s/(.)(.)/print$1*2+$2/eg' 62