$ perl -MDevel::Peek -e'utf8::decode $x="\x{2660}"; Dump $x; utf8::encode $x; Dump $x'
  PV = 0x81651c0 [UTF8 "\x{2660}"]
  PV = 0x81651c0 "\342\231\240"\0