Perl字符串内部
如何在内部表示perl字符串？使用什么编码？如何正确处理不同的编码 我已经使用perl很长时间了，但它没有在不同的编码中包含很多字符串处理，当我遇到与编码有关的小问题时，我通常会求助于一些萨满动作 在此之前，我一直认为perl字符串是字节序列，非常适合我的任务。现在我需要对UTF-8编码文件进行一些处理，这里开始出现问题 首先，我将文件读入如下字符串：Perl字符串内部,perl,string,encoding,Perl,String,Encoding,如何在内部表示perl字符串？使用什么编码？如何正确处理不同的编码 我已经使用perl很长时间了，但它没有在不同的编码中包含很多字符串处理，当我遇到与编码有关的小问题时，我通常会求助于一些萨满动作 在此之前，我一直认为perl字符串是字节序列，非常适合我的任务。现在我需要对UTF-8编码文件进行一些处理，这里开始出现问题 首先，我将文件读入如下字符串： open(my $in, '<', $ARGV[0]) or die "cannot open file $ARGV[0] for rea
open(my $in, '<', $ARGV[0]) or die "cannot open file $ARGV[0] for reading";
binmode($in, ':utf8');
my $contents;
{
local $/;
$contents = <$in>;
}
close($in);
宽字符在第多亏了这些链接，现在我对正在发生的事情以及应该如何做有了更深入的了解。您应该提到您的实际Windows和Perl版本，因为这实际上取决于您使用的版本和安装的语言包。
否则，请先查看手册- Perl使用逻辑宽度的字符在内部表示字符串 这将证实你的陈述
Windows没有完全安装所有UTF8字符-因此这可能是您出现问题的原因。您可能需要安装额外的语言包。在读取文件之前设置utf8很好，它会自动将字节解码为内部编码。（这也是UTF-8，但您不需要知道，也不应该依赖它。） 在打印之前，需要将字符编码回字节
use Encode;
utf8::encode($contents);
哦，它必须使用多字节字符串，因为否则它就不是unicode。Perl字符串在内部存储在两种编码中的一种，要么是面向字节的8位本机编码，要么是UTF-8。对于向后可比性，假设所有I/O和字符串都采用本机编码，除非另有规定。本机编码通常为8位ASCII，但这可以通过
use locale：utf8STDOUTSTDOUT根据您想要完成的任务，您可以使用dylan提到的编码模块将UTF-8数据转换为可以安全打印的单字节字符集，或者如果您知道连接到
STDOUTbinmode（STDOUT，，：utf8'）utf8Encodeuse Encode;
utf8::encode($contents);