$ perl -C6 -e 'print "\x{2660}"' | perl -C1 -pe1 Wide character in print, <> line 1. [junk][junk][junk]