Perl Ausnahmen statt Rückgabewerte

Question

In einigen Perl-Skripte ich mir Dinge zu schreiben finden wie:

open(...) or die $!; 
print ... or die $!; 

usw.

Ich mag würde vermeiden mich or die ... am Ende jeder möglichen Ausnahme sagen, Wiederholung .

Gibt es eine Möglichkeit, Funktionen wie open() usw. zu erzwingen, um eine Ausnahme auszulösen, wenn sie Fehler, nicht nur einen falschen Rückgabewert? Dann konnte ich alle möglichen Ausnahmen auf einmal erfassen.

Answer 1

Ja. Es existiert ein Modul, dass diese Anweisungen bei einem Fehler sterben lässt, es heißt autodie. Fügen Sie es am Anfang Ihres Skripts hinzu.

use autodie; 

## It dies. 
open my $fh, '<', 'nonfile.txt';