This is Msql-Mysql-modules-1.21_15. Using a Mysql data source the
following code returns a field count matching the number of fields in
each table but no rows. How do I access the metadata I expected this
'SQL EXTENSION' to return?
for my $table ( $dbh->tables ) {
print "$table\n";
my $sth = $dbh->prepare("LISTFIELDS $table") || die $dbh->errstr;
my $rc = $sth->execute || die $dbh->errstr;
print "rows = ",$sth->rows," fields = ",$sth->{NUM_OF_FIELDS},"\n";
for my $row ( $sth->fetchrow_arrayref ) {
print "\t@$row\n";
}
}
Paul
--
paul@stripped