Hello *, I work on a solaris platform and the perl 5.8.5 release. I used Tk to design a small front end. I came across a problem and I knew i had to get here. The Tk window, apparently tries to read this file called '.font.cache-1' from my home directory. This file is not present by default in UNIX though. TK creates it. So, the first time I invoke my program, i get a 'segmentation fault' and the code fails. I immediately noticed that a file named '.font.cache-1' got created in my home directory. Now, when the tk program is invoked again, all works fine. I delete this '.font.cache-1' file and invoke again, and all goes down again. Can someone help? here is a sample code which always fails. For the first time that is.

use Tk;

# create first main window
$mw = MainWindow->new( -title => 'Test1' );

# if I remove the following line, no "segmentation fault" occurs.
# even no pack is required to get the "segm fault"
$label = $mw->Label();

# Display first window
Tk::update($mw);
# and destroy it
$mw->destroy();

# create second main window
$mw1 = MainWindow->new( -title => 'Test2' );
$label1 = $mw1->Label()->pack();

# main loop
MainLoop;
[download]

Any ideas? taureau