用Perl创建UTF-8的文件

一般默认创建的文件都是ANSI编码的。用记事本打开这个文件,点”另存为”,最下面有个”编码(Encoding)”可以选择,里面有”ANSI,Unicode,UTF-8″等选项。

下面介绍用Perl直接创建一个UTF-8的文件

open( OUT, ">:utf8", "a.txt" ) or die "a.out: $!";
print OUT "\x{feff}";
print OUT "aaaa\n";
close OUT;