perl - 使用 Plack 和 Middlewares 时将默认 perl 的 IO 切换为 utf-8 是否正确？

Question

两个出发点：

• 在他对为什么现代 Perl 默认避免使用 UTF-8 的回答中？tchrist 指出了确保在 Perl 中正确处理 Unicode 所需的 52 件事。答案显示了带有一些use语句的样板代码。关于使用 Unicode 的一个类似问题是如何使用现代 perl 和 utf8 默认设置“使用 My::defaults”？

• PSGI规范在设计上是面向字节的。我有责任对所有内容进行编码/解码，因此对于 Plack 应用程序，正确的方法是对输出进行编码和对输入进行解码，例如：

  use Encode;
  my $app = sub {
      my $output = encode_utf8( myapp() );
      return [ 200, [ 'Content-Type' =>'text/plain' ], [ $str ] ];
  };
  

使用是否正确

use uni::perl; # or any similar

在 PSGI 应用程序和/或我的模块中？

uni::perl将 Perl 的默认 IO 更改为 UTF-8，因此：

use open qw(:std :utf8);
binmode(STDIN,   ":utf8");
binmode(STDOUT,  ":utf8");
binmode(STDERR,  ":utf8");

这样做会破坏 Plack 或其中间件中的某些内容吗？或者是为 Plack 编写应用程序的唯一正确方法，在打开时显式编码/解码，所以没有openpragma？

Answer 1

你真的不想在 Plack 上默认设置STDIN/STDOUT为 UTF-8 模式，因为你不知道它们是否会是二进制数据传输。例如，如果这些文件句柄是 FastCGI 协议连接器，它们将携带编码的二进制结构而不是 UTF-8 文本。因此，它们不能定义编码层，否则这些二进制结构将被破坏或拒绝为无效。

Answer 2

在现代 GNU/Linux 系统上，您应该在全局范围内完全切换到 UTF-8。这意味着设置

LANG="xx_YY.UTF-8"
PERL_UNICODE=SDAL
PERL5OPT=-Mutf8

在您的/etc/environment或/etc/sysconfig/i18n或/etc/default/locale或您的系统配置文件中。由于RHEL/Centos 错误，我符号链接/etc/environment到sysconfig/i18n.

依赖二进制输入的脚本应设置binmode为 STDIN/OUT/ERR(?) 或use openpragma 或应使用-C0选项调用。

问题是某些DBD驱动程序有问题，例如DBD::JDBC，您必须手动设置 utf8 标志。

use Encode qw/_utf8_on/;
map { _utf8_on $_; } @strings;