$mw->after(1000 => sub { $button->eventGenerate('<ButtonPress-1>') });
MainLoop();