从ASCII字符串中的2个字节字符中删除重音

Question

我正在阅读服务器的数据，该数据被返回为JSON，并使用JSON :: PARSE解析。 JSON数据包含重音字符，例如É。这些在输出字符串中编码为2个字节字符，例如\ xc3 \ xa9。字符串的其余部分是标准的1个字节ASCII字符。

如何从这些角色中删除口音？我已经尝试了以下所有方法，但没有成功：

use Unicode::Normalize;
use utf8;
use Text::Iconv;
use Encode qw(from_to);
use Text::Unidecode;

sub normalise_text {
  my $text = shift;
  my $decomposed = NFKD( $text );
  $decomposed =~ s/\p{NonspacingMark}//g;
  return $decomposed;
}

sub convert {
  my $converter = Text::Iconv->new("utf16", "utf8");
  return $converter->convert($_);
}

sub fromto {
  return from_to($_, 'UTF-16LE', 'UTF-8');
}

这些库倾向于按字节基础转换每个字符，这是不好的。在短期内，我进行的转换如下：

sub mine {
  my $text = $_;
  $text =~ s/\xc3\xa9/e/g;
  $text =~ s/\xc3\xa1/a/g;
  return $text;
}

必须有更好的方法！有什么建议吗？