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

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