my $sth = ( $dbh->prepare($cmd) || die "Zeile: $line" . $dbh->errstr );