in reply to endless loops for server and tk
If you need to split up MainLoop so you can integrate it into another loop, you can try something like:
while( .... ) { # some non-blocking stuff if( Tk::MainWindow->Count ) { local $inMainLoop = 1; DoOneEvent(0); } # if else { # no more mainwindows, finish somehow } # else # other non-blocking stuff } # while
(not tested; see: Tk.pm -> MainLoop)
But that may (or may not) become dangerous if Tk.pm is changed in future
Best regards,
perl -e "s>>*F>e=>y)\*martinF)stronat)=>print,print v8.8.8.32.11.32"
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: endless loops for server and tk
by hudo (Novice) on Aug 10, 2007 at 03:47 UTC |
In Section
Seekers of Perl Wisdom