Wie mit Perl, DB-Feldnamen auslesen ?

Hallo :smile:
Tja, bisher weiss ich wie ich Feldwerte auslesen kann.
So:
my $dbh = DBI->connect(„DBI:open_mouth:DBC:dpa“ ,’’ , ‚‘); $dataObject=$dbh->prepare(„SELECT FIELDS FROM dpa01“) || die „Kann die Abfrage nicht vorbereiten : $DBI::errstr“ ;
$dataObject->execute();

Aber wie kann ich die Feldnamen auslesen ?

Danke :smile:

CU Seb

Tja wie kann man Feldnamen aus DB-Tabelle auslesen.
Ich weiss noch nicht ob und wie es mit einer Access DB und Perl geht (wie ich es brauche) jedoch weiss ich wie es mit MySQL gehen würde.
Ich hörte folgendes:
Gibt mit MySQL zusamen die Spaltennamen/Feldnamen aus:
$dataObject=$dbh->prepare(„DESCRIBE db01“) || die „Kann die Abfrage nicht vorbereiten : $DBI::errstr“ ;

Oder:
my $sth = $dbh->prepare(„SHOW COLUMNS FROM dpa01“) || die „Kann die Abfrage nicht vorbereiten : $DBI::errstr“ ;

Es soll auch irgenwie mit array-ref, read-only im Zusammenhang mit dem DBI - Modul gehen. Vielleicht dann ja auch mit Acess ?

Im Manuell steht dazu:
array-ref, read-only. Returns a reference to an array of field names for each column. The names may contain spaces but should not be truncated or have any trailing space. Note that the names have the letter case (upper, lower or mixed) as returned by the driver being used. Portable applications should use NAME_lc or NAME_uc.

CU Seb