Ein <#d6>konomisches Modell
Ein <#d6>konomisches Modell 1
Ein <#d6>konomisches Modell 1

Ein <#c3><#96>konomisches Modell
Ein <#c3><#96>konomisches Modell
Ein <#c3><#96>konomisches Modell

##</code><code>##

use Devel::Peek qw( Dump );

my $s1 = "Ein Ökonomisches Modell";
my $s2 = "Ein \326konomisches Modell";

Dump($s1);
Dump($s2);

utf8::upgrade( $s1 );
utf8::upgrade( $s2 );

Dump($s1);
Dump($s2);

##</code><code>##

SV = PV(0x2369cc) at 0x182a354
  REFCNT = 1
  FLAGS = (PADMY,POK,pPOK)
  PV = 0x23fcc4 "Ein \326konomisches Modell"\0
  CUR = 23
  LEN = 24
SV = PV(0x2369dc) at 0x182a384
  REFCNT = 1
  FLAGS = (PADMY,POK,pPOK)
  PV = 0x23fd9c "Ein \326konomisches Modell"\0
  CUR = 23
  LEN = 24
SV = PV(0x2369cc) at 0x182a354
  REFCNT = 1
  FLAGS = (PADMY,POK,pPOK,UTF8)
  PV = 0x182430c "Ein \303\226konomisches Modell"\0 [UTF8 "Ein \x{d6}konomisches Modell"]
  CUR = 24
  LEN = 25
SV = PV(0x2369dc) at 0x182a384
  REFCNT = 1
  FLAGS = (PADMY,POK,pPOK,UTF8)
  PV = 0x1832744 "Ein \303\226konomisches Modell"\0 [UTF8 "Ein \x{d6}konomisches Modell"]
  CUR = 24
  LEN = 25