I think what you want is just "show tables".
my $sth = $dbh->prepare("show tables");
$sth->execute();
while (my $table = $sth->fetchrow()) {
push @$tables, $table;
}
my $count = scalar @$tables;
Philip
------------------
Limecat is not pleased.
Code:
my $tables = []; my $sth = $dbh->prepare("show tables");
$sth->execute();
while (my $table = $sth->fetchrow()) {
push @$tables, $table;
}
my $count = scalar @$tables;
Philip
------------------
Limecat is not pleased.