$window->signal_connect(destroy => sub {Gtk2->main_quit() if (Gtk2->main_level()); exit 0;}); #<---ERROR