$SIG{__DIE__} wird immer aufgerufen wenn ein Perl Programm sterben sollte. Mit einem Block eval kann man das zwar abfangen, dass sollte allerdiengs trotzdem $SIG{__DIE__} aufrufen, und du wirst do wohl auch nichts dran ändern können das es das nicht mehr aufruft.

Weiter einarbeiten habe ich keine Lust in deinem Problem da man Sachen wie __DIE__ und __WARN__ überarbeiten sein lassen sollte, da es einige Probleme hervorrufen kann. Und vielleicht ist dein Problem ja jetzt genau solch ein Beispiel warum man es nicht machen sollte.

Von daher würde ich dir sagen such dir eine andere Möglichkeit für das was auch immer du machen möchtest, und überschreibe nicht mehr __DIE__ und __WARN__.