Programm-Abbruch verhindern: Kei nAbbruch wenn open-funktion fehler - #75111 (Allgemeines zu Perl)

bloonix

2007-03-17 17:14

User since
2005-12-17
1615 Artikel
HausmeisterIn

Hallo rommi,

[quote=rommi,17.03.2007, 14:00]wenn du mal meine Beiträge zählen würdest wüsstest du dass ich sehr selten eine Frage stelle und es wahrscheinlich auch in Zukunft nicht oft vorkommt !![/quote]

die Anzahl deiner Beiträge ist mir wurscht. Das hätte ich auch zu
jemanden geschrieben, der weit aus mehr Beiträge geschrieben hat.
Zudem ist hier fast jeder Beitrag willkommen. In Foren ist das nun mal
so, dass man Antworten bekommt, die jemanden darauf hinweisen,
das Dokumentationen nicht beissen. ;)

[quote=rommi,17.03.2007, 14:00]Könntest du jetzt mal auf meine Frage antworten?[/quote]

Ja, gerne.

Quote
Aber gibts es da nicht irgendeinen Parameter beim Programmaufruf oder irgendeine Programmanweisung (wie z.B. use strict etc.) dass Fehler ignoriert werden und das Programm dann weiter läuft.

Gibt es und zwar genau das Beispiel, was dir renee schon gezeigt hat.
Du kannst fast alles in eine if-Anweisung packen oder auf Fehler mit
einem "or" reagieren. Das ist auch der Grund, weshalb ich mein Comment
abgegeben habe... ich hatte einfach das Gefühl, dass du zwar sehr
löblich

open ... or die ()

benutzt, aber nicht weißt, was man damit alles machen kann. Es ist zum
Beispiel möglich do{} oder eine Routine oder was auch immer aufzurufen.

Code: (dl )

open my $fh, '<', $file or do {
   print STDERR "Konnte Datei $file nicht oeffnen: $!"
   print STDERR "Versuche naechste Datei zu oeffnen...\n";
   next;
};

oder

Code: (dl )

open my $fh, '<', $file or fehler_routine($file, $!);

sub fehler_routine {
   my $file = shift;
   my $fehler = shift;
   # fehler verarbeiten
}

Gruss,
opi\n\n

What is a good module? That's hard to say.
What is good code? That's also hard to say.
One man's Thing of Beauty is another's man's Evil Hack.