So nebenbei, was mir auffällt ist, daß Du doppelte Fehlerbehandlung machst, besser gesagt, Deine eigene wird nie greifen, weil "RaiseError => 1" schon dazu führt, daß alle Deine Datenbankaufrufe mit dem Objekt $dbh implizit schon "die" aufrufen. Du mußt damit Fehlermeldungen nicht mehr selbst behandeln, wenn Dir "die" reicht. Wenn Du sie jedoch selbst behandeln willst, setze entweder RaiseError auf 0 oder mache ein "eval{....};" um die kritischen Stellen und fange Fehler in $@ ab.

use DBD::mysql ist überflüssig.

Das Thema finde ich übrigens auch ganz interessant und werde es beobachten.