bei GUIs friert bei einem Sleep fuer die angegebene Zeit die komplette Anwendung ein, und man kann damit nichts mehr machen. Deshalb besser einen Timer mit $mw->After($miliseconds, \&callback) laufen lassen, der nach $miliseconds die Subroutine &callback ausfuehrt. Tk::after