次のコードは私の問題を示しています。これを実行すると、「UCS-2LE:code point "\ x {20541}"」というエラーメッセージが表示されます。C:/Perl/site/lib/Tk/Widget.pm行205で高すぎます。E:\testで。 pl行9"。
私のTkバージョンは804.028で、WinXP(簡体字中国語バージョン)でActivePerl10.0.0を実行しています。
それを回避する方法があるかどうか誰かが知っていますか?いつものようにありがとう:)
use strict;use warnings;
use utf8;
use Tk;
my $mw = MainWindow->new;
my $text = ""; #A Chinese character
eval{
$mw->Label(-text => $text)->pack;
};
warn $@ if $@;
MainLoop;