mehr als 407 Zeichen mit "$x->func('dbms_output_get');" lesen

[Alexander (HH)]

Moin Moin!

hi,

Du hast $dbh->{RaiseError} = 1; gesetzt. Nutze es auch, prüfe ob eine Exception auftritt

Mumpitz! Da ist kein eval weit und breit, Exceptions hätten das Script sofort beendet.

und teste die Prozedur auch mal unabhängig von Perl.

use English; # now, $@ means $EVAL_ERROR

Was kaum jemandem nützt und in dieser Form jeglichen Code, der RegExps benutzt, massiv ausbremst.

"Wenn man keine Ahnung hat: Einfach mal Fresse halten." -- Dieter Nuhr

Alexander