print unpack 'b10', pack 's', -1;; 
1111111111

print unpack 'b10', pack 's', -21;;
1101011111

print unpack 'b10', pack 's', 1024;;
0000000000