#... vorheriger Code
$dbh->execute() or &handle_error();
#... der weitere Code

sub handle_error{
  print "Es ist ein Fehler beim Einfügen in die Datenbank aufgetreten...\n";
}