http://www.perlmonks.org?node_id=907389


in reply to TK close window int signal

well damn. i know i wrote a post earlier explaining what i tried. mehhh. well i did it now. $mw->protocol('WM_DELETE_WINDOW',\&clean_exit); the [] brackets threw me off and broke the code

Replies are listed 'Best First'.
Re^2: TK close window int signal
by Anonymous Monk on May 31, 2011 at 01:54 UTC
    There is no need for any of that, just call exit after MainLoop
    Main ( @ARGV ); exit ( 0 ); sub Main { ... MainLoop; }