The info returned is not very useful. Try this instead
$sth->prepare("SHOW FIELDS from $table");
$sth->execute;
my %type;
while(@row = $sth->fetchrow_array) {
$type{$row[0]} = $row[1];
}
$sth->finish;
foreach $key(%type) {
print "Field Name: $key Type: $type{$key}\n";
}
This gives you a hash of fieldname:type pairs keyed on field name.
(though some field types will include the length, i.e. char(20) but a
good regular expression will take care of that ;-)
> Qiang Tan writes:
> > > Could somebody tell me how to get the fields' type through DBI:DBD of
> Perl?
> > > I tried one, but it does not work as stated in doc:
> Just fix:
>
> $types = $sth->{types};
>
> to
>
> $types = $sth->{type};
Take care of your shoes...
Jay
fty@stripped

Content reproduced on this site is the property of the respective copyright holders. It is not reviewed in advance by Oracle and does not necessarily represent the opinion of Oracle or any other party.