The quick answer is to specify the font configuration option of your widget as in:
#!/usr/local/bin/perl -w use Tk; $main = MaiWindow->new(); $labl = $main -> Label('-text' => "Foo", '-font' => "fixed"); $labl -> pack; MainLoop;The long answer involves figuring out what fonts you have access to locally. The Unix programs xlsfonts and xfontsel are useful in this regard.
The perl/Tk version of xfontsel was distributed as the font_test script in the Tk-b9.01 build directory.
See also the later question (within this FAQ) on international fonts.
Previous | Return to table of contents | Next