$ perl -wE'
use HTML::Entities;
use Devel::Peek;
use Encode;
my $string = "häufig Datenschutzerklärung";
$decoded = decode_entities($string);
Dump $decoded;
say encode_utf8 decode("latin1", ($decoded));
'
SV = PV(0x17f0b58) at 0x180fc58
  REFCNT = 1
  FLAGS = (POK,pPOK)
  PV = 0x1819990 "h\344ufig Datenschutzerkl\344rung"\0
  CUR = 27
  LEN = 40
häufig Datenschutzerklärung