in reply to Perl Tk -font option is not working in linux if the language is japanese
perl -MEncode -MTk -e 'my $j = decode("utf-8", "\xe6\x97\xa5\xe6\x9c\x +ac\xe5\x9b\xbd"); my $w = new MainWindow::; $w->Label(-text => $j, -font => "-adobe-helvetica-regular-r-normal-*-12-*-*-*-* +-*-*-*" )->pack; MainLoop()'
|
|---|