Select Code to Download

Select or download this

perl> printf "%b\n", 162;;
10100010
...
1 011 0100
perl> print unpack 'B1B3B4', 162;; ## In case of different endian mach
+ines.
0 001 0011

Select or download this

perl> print unpack '(B8)4', pack 'N', 0b11111111_10101010_01010101_000
+00000;;
11111111 10101010 01010101 00000000

perl> print unpack '(B4)4', pack 'N', 0b11111111_10101010_01010101_000
+00000;;
1111 1010 0101 0000

Select or download this

perl> print unpack '(B16)2', pack 'N', 0b11111111_10101010_01010101_00
+000000;;
1111111110101010 0101010100000000

perl> print unpack '(B12)2', pack 'N', 0b11111111_10101010_01010101_00
+000000;;
111111111010 010101010000

Select or download this

perl> print unpack '(b8)3', pack 'V', 162;;
01000101 00000000 00000000

perl> print unpack 'b1 b3 b4', pack 'V', 162;;
0 000 0000

Select or download this

perl> print unpack '(B8)3', 162;;
00110001 00110110 00110010

perl> print unpack 'B1B3B4', 162;;
0 001 0011

Select or download this

perl> print unpack 'B1B3B4', '162';;
0 001 0011