7 require "src/logger.pl";
8 require "src/modules.pl";
10 require "src/Files.pl";
11 $bot_src_dir = "./src/";
14 if (!defined $dbname) {
15 print "Usage: $0 <db name>\n";
16 print "Example: $0 factoids\n";
21 &loadConfig("files/blootbot.config");
24 &openDB($param{'DBName'}, $param{'SQLUser'}, $param{'SQLPass'});
26 # retrieve a list of db's from the server.
28 foreach ($dbh->func('_ListTables')) {
33 if (!exists $db{$dbname}) {
34 print "error: $dbname does not exist as a table.\n";
38 my $query = "SELECT factoid_key,factoid_value from $param{'DBName'}.$dbname";
39 my $sth = $dbh->prepare($query);
41 while (my @row = $sth->fetchrow_array) {
42 print "$row[0] => $row[1]\n";