[mysql/perl] lengte varchar opvragen

[bRight]

Ik gebruik de volgende methode om de kolomnamen + max stringlengtes van een tabel op te vragen (uitgaande van varchars):

Perl:

$sth = $dbh->prepare('SELECT * FROM '.$tabelnaam);
$sth->execute;
my $fields = $sth->{'NAME'};
my $lengths = $sth->{'LENGTH'};

foreach (0..$#{$fields}) {
        print "kolomnaam: ${$fields}[$_]<br>";
        print "lengte: ${$lengths}[$_]<br>";
}

Regel 4 genereert een error. Blijkbaar kent de DBI dit attribuut niet:

Software error:
Can't get DBI::st=HASH(0x84caa5c)->{LENGTH}: unrecognised attribute at line 4.

Mijn hostingprovider heeft al de nieuwste DBI versie geinstalleerd, maar het probleem blijft..
Is er nog een andere methode om de lengtes op te halen? Ik kan ze natuurlijk wel in een aparte tabel gaan bijhouden, maar dat vind ik niet zo'n nette oplossing

[ Voor 8% gewijzigd door bRight op 14-01-2004 12:56 . Reden: tikfout :) ]

[bigtree]

Kan ook gewoon in MySQL:

MySQL:

SELECT MAX(LENGTH(kolom)) AS MaxLength FROM tabel

[bRight]

tnx, maar ik heb gewoon de ingestelde lengte van alle fields/kolommen nodig, meer niet
anyone?

[ Voor 5% gewijzigd door bRight op 14-01-2004 13:41 ]

[Annie]

Is SHOW COLUMNS FROM tbl_name... niet iets wat je kan gebruiken?

[ Voor 5% gewijzigd door Annie op 14-01-2004 14:39 . Reden: linkje ]