Thread Perl-Skript und Scheduled Tasks: Perl-Skript läuft nicht los... (18 answers)
Opened by Ozymades at 2007-04-10 14:25

bloonix
 2007-04-10 15:56
#75786 #75786
User since
2005-12-17
1615 Artikel
HausmeisterIn
[Homepage]
user image
[quote=Ozymades,10.04.2007, 13:46]Das wird aber nicht zurückgesetzt, sprich, wenn weiter vorne was schiefgegangen ist, steht die Fehlermeldung immer noch in $![/quote]
aber das ist doch garnicht schlimm, denn egal was du ausführtst, ob
open(), close(), print() ... in $! steht immer der aktuelle Fehler. Wenn also
eine Funktion FALSE zurückliefert und du mit einem "if", "unless", einem
"or" oder was auch immer reagierst, dann brauchst du $! nie auf 0 setzen.

Das halte ich für unnötigen Code. Wie sieht denn das aus...

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
$! = 0;
print LOG "foo bar";
if ($!) {
   print STDERR "Fehler: $!";
}
$! = 0;
print LOG "foo bar";
if ($!) {
   print STDERR "Fehler: $!";
}
$! = 0;
print LOG "foo bar";
if ($!) {
   print STDERR "Fehler: $!";
}
$! = 0;
print LOG "foo bar";
if ($!) {
   print STDERR "Fehler: $!";
}


Das macht deinen Code schwammig. Warum nicht so:

Code: (dl )
1
2
3
4
print LOG "foo bar" or warn "Fehler: $!";
print LOG "foo bar" or warn "Fehler: $!";
print LOG "foo bar" or warn "Fehler: $!";
print LOG "foo bar" or warn "Fehler: $!";


:)\n\n

<!--EDIT|opi|1176206418-->
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.

View full thread Perl-Skript und Scheduled Tasks: Perl-Skript läuft nicht los...