如何将JSON字符(例如 u00e1)转换为Perl中的原始字符

Question

我正在使用perl并获得了解析的JSON格式。现在我希望像 u00e1这样的字符被转换为Á。我该怎么做？

Answer 1

用该数据解析JSON Will 给您那个字符。

也许您只需要正确编码输出？

perl -MJSON::XS -E'binmode(STDOUT, ":utf8");say shift JSON::XS::decode_json(q|["u00e1"]|)'