在Perl中将Unicode代码点转换为Unicode字符

Question

我首先要承认，在这里我已经有了一些非常基本的东西。

输入（从STDIN）到我的Perl代码是Ç（资本c和cedilla）。 我通过将这一行放在我的代码顶部来解码它：

binmode STDIN, ":encoding(UTF-8)";

一旦用户输入'Ç'，我就打印出来。输出为\ xC7。我完全理解这是因为cedilla的大写c的Unicode代码点是U + 00c7。

如何将STDOUT上的打印输出设为'Ç'，即将代码点转换为字符？

我还添加了这一行来将输出编码为STDOUT：

binmode STDOUT, ":encoding(UTF-8)";

Answer 1

您可以对STDOUT执行与STDIN相同的操作：

perl -e 'binmode STDOUT, ":encoding(UTF-8)";print chr(0xc7);'

打印

Ç

根据需要。