$outstr = $instr; utf8::upgrade($outstr);
# or
$outstr = Encode::decode("latin-1", $instr);
# or add and remove a utf8 character:
$outstr = $instr . "\x{100}"; chop $outstr;