perl -E 'say unpack "b*", pack "Q", ( 3<<$_ ) for 60..70;'
0000000000000000000000000000000000000000000000000000000000001100
0000000000000000000000000000000000000000000000000000000000000110
0000000000000000000000000000000000000000000000000000000000000011
0000000000000000000000000000000000000000000000000000000000000001
1100000000000000000000000000000000000000000000000000000000000000
0110000000000000000000000000000000000000000000000000000000000000
0011000000000000000000000000000000000000000000000000000000000000
0001100000000000000000000000000000000000000000000000000000000000
0000110000000000000000000000000000000000000000000000000000000000
0000011000000000000000000000000000000000000000000000000000000000
0000001100000000000000000000000000000000000000000000000000000000