siehe meine antwort unten, das macht keinen sinn, eval zu machen, $@ abzufragen und dann aber doch DBI::errstr auszugeben.
eval -> fehlermeldung steht in $@