print $x:

##</code><code>##

Wide character in say at ./1.pl line 10.

##</code><code>##

0000000: c2aa c594 c2aa c594 0a30 3130 3130 3130  .........0101010
0000010: 3130 3031 3031 3031 3030 3130 3130 3130  1001010100101010
0000020: 3130 3031 3031 3031 300a                 100101010.