missing ); on replacement statement;
In reply to Re^5: Perl/Tk and exit(0) by tybalt89 in thread Perl/Tk and exit(0) by saw55