use utf8; chr(192) =~ /\w/; #### foreach (90, 192, 257, 0x263a) { print "$_ - ", join ('.',unpack('C*',chr($_))),"\n" }