in reply to Re^3: passing qr//'d regexp via Perl/Tk Entry widgetin thread passing qr//'d regexp via Perl/Tk Entry widget