$ perl -MDevel::Peek -MEncode=_utf8_on,_utf8_off,encode -e'
    _utf8_on( $x = "\342\231\240" );

    utf8::encode( my $utf8 = $x );
    my $enc = encode("UTF-8", $x);
    _utf8_off( my $off = $x );

    Dump $x;
    Dump $utf8;
    Dump $enc;
    Dump $off;
'
  PV = 0x8165280 "\342\231\240"\0 [UTF8 "\x{2660}"]
  PV = 0x81623f0 "\342\231\240"\0
  PV = 0x81920e8 "\342\231\240"\0
  PV = 0x81ff040 "\342\231\240"\0