In Linie 15
my $dbh = DBI->connect('DBI:ODBC:kunden') or die "Fehler beim Connect:",$DBI::errstr;
Eigentlich solltest du hier auch den Fehler mitgeteil bekommen, aber ich nehme an das DBI::errstr keine Skalar ist, es ist eigentlich eine Funktion, also probier mal
my $dbh = DBI->connect('DBI:ODBC:kunden') or die "Fehler beim Connect:",DBI::errstr();
Ansonsten fehlen, wie schon Christoph erwähnt hat, Parameter.
Struppi.
--
Javascript ist toll (Perl auch!)
Javascript ist toll (Perl auch!)