das ist eigentlich das, was man überlicherweise macht.
*jedes* statement in ein einzelnes eval zu packen und jedesmal $@ abzufragen, ist doch viel zu umständlich.

überleg mal, du hast vermutlich in der regel eine reihe von statements, die voneinander abhängen. wenn eines davon fehlschlägt, macht der rest derstatements und des codes dahinter auch keinen sinn mehr, daher ist es völlig in ordnung, wenn ein eval um einen grösseren block steht. dann dann wird dieser komplett abgebrochen und du bekommst die fehlermeldung des statements, welches fehlgeschlagen ist.

gegenfrage: wenn du im moment jedes statement in ein eval packst, um danach $@ abzufragen, wieso benutzt du dann überhaupt RaiseError? dann könntest du RaiseError auch auf 0 setzen und einfach $dbh->errstr abfragen.

RaiseError ist dafür da, dass man sich eben gerade nicht um jede einzelne Abfrage kümmern muss. man packt das eval um den block, der zusammenhängt und abgebrochen werden soll, falls etwas darin fehlschlägt.

2011-11-03T09:42:16 Kean

Code (perl): (dl )

1
2
3
4
5

                
if ($@)
{
print "Datenbankfehler: ".DBI::errstr;
}

Ist das Möglich? Oder würde da eh nie eine Fehlermeldung bei rauskommen?

ich nehme mal an, du möchtest hier $@ abfragen, nicht DBI::errstr.

wenn du ein eval machst, dann steht die fehlermeldung in $@. könnte ja in einem block auch ein anderer fehler als von DBI gewesen sein.