Установка шрифтов в Perl-TK-800

с консоли так:

tkscript.pl -font '*-iso8859-2'

определить во всем скрипте кажись так:

$mw->optionAdd("*font", "*-koi8-r");

Спасибо, помогло :)