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