Hi, habe das nun so mal versucht:
Es ändert jedoch nichts am Problem.
Wenn der User auf das Windows X clickt schließt die komplette Anwendung anstatt nur das Fenster.

Der Text "Ich will mich nicht schliessen" wird an der Konsole ausgegeben und die Anwendung startet nun auch, trotz der eingefügten

Quote

sub W5_Terminate { print "Ich will mich nicht schliessen"; return -1;}

Danke vielmals für die Hilfe.
Ist das Problem "normal" für Perl?
Oder ist mir im Code ein Fehler unterlaufen?

Thanx