print unpack ('B16', $_)."\n" for (0..10); #### 00110000 00110001 00110010 00110011 00110100 00110101 00110110 00110111 00111000 00111001 0011000100110000