请教Perl访问中文路径

sysulzh

如下所示，如果路径中没有中文，可以正常列出目录下的文件；但当路径名有中文时，打开路径就错误了。
请问该如何打开有中文的路径呢？谢谢！

######################################
use utf8;

my $dir = 'D:\test\测试';

opendir DIR, $dir;

my @files = readdir(DIR) or die "Failed to open $dir\n";;

foreach (@files)
{
  print "$_";
}

closedir(DIR);
######################################

sysulzh

回复 1# sysulzh


    呃。。。好吧。去掉"use utf8;", 把文件编码改GB2312或ANSI就可以了