Newbie -Keine Ausgabe bei mysql-query - #118040 (Datenbanken und Verzeichnisdienste)

deletemast

2009-01-15 19:35

User since
2009-01-14
23 articles
BenutzerIn
[default_avatar]

Hallo nepos, ich habe von der verlinkten Seite mal ein Example ausprobiert
und es funktioniert!
Also lesen aus DB klappt,
anlegen, schreiben in db-table klappt auch
ich verstehe immer noch nicht, warum mir trotzdem keine Datenquellen angezeigt werden.
für den Code:

Code (perl): (dl )

#!C:/Perl/bin/perl.exe -w
# dbi3.pl vorhandene Datenquellen
use DBI;
print "Content-type: text/html\n\n";
my $dbh = DBI->connect("DBI:mysql:database=adressen;host=localhost",
        "root", "",
        {'RaiseError' => 1});
my @sources = DBI->data_sources("mysql",{"localhost" => $host, "3306" => $port});
@drivers = DBI->available_drivers;
print "vorhandene Datenquellen:<br>";
for (@drivers)
        {
                print join("\n", DBI->data_sources($_));
        }

erhalte ich wieder folgende Ausgabe:
vorhandene Datenquellen:
DBI:CSV:f_dir=.install_driver(Oracle) failed: Can't load 'C:/Perl/lib/auto/DBD/Oracle/Oracle.dll' for module DBD::Oracle: load_file:///Das angegebene Modul wurde nicht gefunden at C:/Perl/lib/DynaLoader.pm line 201, line 275. at (eval 32) line 3 Compilation failed in require at (eval 32) line 3, line 275. Perhaps a required shared library or dll isn't installed where expected at c:\inetpub\wwwroot\cgi-bin\dbi3.pl line 18 DBI:DBM:f_dir=.dbi:ExampleP:dir=.DBI:File:f_dir=. (in cleanup) DBD driver has not implemented the AutoCommit attribute at C:/Perl/site/lib/DBD/LDAP.pm line 257, line 275 during global destruction.

es wurde doch jetzt speziell der driver "mysql" angegeben mit Host, Port, user und pw???

Kannst du mir bitte mal den kompletten Code geben, der funktionieren müsste?

Danke