C:\test\perl -MDevel::Peek -e"utf8::upgrade( $x = qq[abc\xee] ); Dump($x);" SV = PV(0xea240) at 0x275898 REFCNT = 1 FLAGS = (POK,pPOK,UTF8) PV = 0xef178 "abc\303\256"\0 [UTF8 "abc\x{ee}"] CUR = 5 LEN = 6