5

以下最小示例的输出显示(在我的 linux 机器上)File::Glob 似乎具有将 utf8 字符串转换为非 utf8 的意外副作用:

#!/usr/bin/perl 

use utf8;

use strict;

my $x = "påminnelser";
my $y = glob $x;

print "x=",utf8::is_utf8($x),"=\n";
print "y=",utf8::is_utf8($y),"=\n";

这导致我的程序出现错误行为。在 linux 上,看起来我可以通过在 File::Glob 之后应用 utf8::decode() 来修复它。这是解决此问题的正确方法吗?这是 File::Glob 中的错误吗?我的修复是否会在其他系统(例如 Windows)上产生正确的结果?

4

1 回答 1

3

处理文件名的函数的编码处理目前在 perl 的待办事项列表中:文件名中的 Unicode。问题是一些流行的操作系统(例如 Linux)不支持文件名编码(除了使用当前的语言环境设置,但这被设计破坏了),所以在 Perl 中获得一个可移植的解决方案并不容易。

我的建议是完全避免使用非 ASCII 文件名。

于 2013-08-26T07:11:57.190 回答