Select Code to Download

$sth = $dbh -> prepare (qq~use FFImages~);
$sth -> execute();

$sth = $dbh -> prepare (qq~use FFImages select * from information_sche
+ma.tables where table_catalog = 'FFImages' and table_type = 'Base Tab
+le'~) or die "Could not prepair";
$sth -> execute() or die "$DBI::errstr";