perl -CO -E 'say "\N{U+00E1}"'
版画
á
如何实现与以下相同:
echo "U+00E1" | perl -CO -lnE 'say what_here($_)'
echo "U+00E1" | perl -Mcharnames=short -CO -lnE 'say charnames::vianame($_)'
您还可以使用eval,如果您可以控制输入内容:
echo "U+00E1" | perl -CO -lnE 'say eval qq("\\N{$_}")'