print出来的乱码怎么解决啊?

print出来的乱码怎么解决啊?

print出来的乱码怎么解决啊?
代码如下,也保存成了utf-8的格式,但是print语句输出的都是乱码啊,Perl版本是5.10.0。
----
use UTF8;

print '请输入第一个数字:' . "\n";
$number1 = <STDIN>;
chomp $number1;

print "\n" . '请输入第二个数字:' . "\n";
$number2 = <STDIN>;
chomp $number2;

$sum = $number1 + $number2;

print "$number1" . '和' . "$number2" . '相加之和为:' . "$sum。";
----
你的cmd或console是utf8的环境么?如果不是的话,自然乱码
print时不是用utf8就一切ok。要根据你的环境选择


QUOTE:
原帖由 透明de面具 于 2008-8-3 11:34 发表
你的cmd或console是utf8的环境么?如果不是的话,自然乱码
print时不是用utf8就一切ok。要根据你的环境选择

就是Windows的控制台,应该是没问题的吧。
存成ANSI格式就解决好了,有点困惑啊,为什么保存为UTF-8格式会乱码呢?


QUOTE:
原帖由 lujx 于 2008-8-3 11:37 发表

就是Windows的控制台,应该是没问题的吧。

Windows 控制台支持 utf-8 么?


QUOTE:
原帖由 MMMIX 于 2008-8-3 13:41 发表

Windows 控制台支持 utf-8 么?

应该可以的,记得以前python程序的中文输出是没问题的。