in reply to Perl::Tk - Event sequencing question
If all you want is blocking an execution thread, then you want to look at $mw->waitVariable.