baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
#define eval _eval
Alle Einträge zum Thema: | Zur Liste |
$code = '... beliebige Fehler ...'; local $SIG{__DIE__} = sub { $@="@_"; }; # im Fehlerfall $@ nachstellen $@=''; eval($code); # $@ zurücksetzen und eval() if ($@) { out "Es ist der Fehler '$@' aufgetreten!<br>\n"; }
<hr><h3>Beispiel:</h3><perl> local $SIG{__DIE__} = sub { $@="@_"; }; $code1 = ' out "... Stringende vergessen;'; $@=''; eval($code1); out "FEHLER: '$@'<br>\n" if $@; $code2 = ' my $test = 1/0; '; $@=''; eval($code2); out "FEHLER: '$@'<br>\n" if $@; $code3 = ' &vergessen();'; $@=''; eval($code3); out "FEHLER: '$@'<br>\n" if $@; $code4 = ' out "kein Fehler :)";'; $@=''; eval($code4); out "FEHLER: '$@'<br>\n" if $@; </perl><hr>
sub _eval { local $SIG{__DIE__} = sub { $@="@_"; }; $@=''; eval($_[0]; }
#define eval _eval
Liste der Einträge von 22951 bis 23101: | Einklappen | Zur Eingabe |
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge |
© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |