perl - 如何在 Perl 中将命令行参数视为 UTF-8？

Question

@ARGV的元素如何处理作为 Perl 中的 UTF-8？

目前我正在使用以下解决方法..

use Encode qw(decode encode);

my $foo = $ARGV[0];
$foo = decode("utf-8", $foo);

..这有效但不是很优雅。

我正在使用从 bash v3.2.25 调用的 Perl v5.8.8，LANG 设置为 en_US.UTF-8。

Answer 1

使用Encode::Locale :

use Encode::Locale;

decode_argv Encode::FB_CROAK;

这也适用于Win32，对我来说还不错。