perltk中文解决方案

zzh2004linux

#!/usr/bin/perl
use Tk;
use encoding 'gb2312';#关键就是这行
my $mw = MainWindow->new;
$mw->title("世界你好");
$mw->Button(-text => "世界你好", -command => sub { exit })->pack;
MainLoop;


这样就可以看到中文拉，呵呵.......

lanche

有些朋友的系统用的是gb18030哦，

duotaiya

最好用utf8，然后文档也存成utf8编码，这样即使是其它的local也可以显示中文

zzh2004linux

我存过UTF8，但还是乱码呀，这个代码还是从一个台湾高手那里写的程序得到的启发呢！