in reply to Re: Perl Tk , MainLoop, destroy function problemin thread Perl Tk , MainLoop, destroy function problem