Ich habe den Befehl

$mw->protocol("WM_DELETE_WINDOW" => sub { &ende });

gefunden. Über diese Funktion müsste es doch funzen. Habe auch schon bei CPAN nachgesehen. Aber leider nichts gefunden.