Извините, если это может быть глупый вопрос для всех вас, но я не знаю, что делать. Я пытаюсь подключиться к локальной базе данных, используя Perl. Когда я пытаюсь выполнить команду, я получаю ошибку ниже
DBD::mysql::st execute failed: Table 'RegenMedline.user_tables' doesn't exist at Medlineparser.pl line 639.
Моя строка 639 выглядит примерно так:
$main::dbh = DBI->connect("dbi:mysql:databasename",
$main::user="username",
$main::password="password",
{PrintError => 1,
RaiseError => 1,
AutoCommit => 1})
or die "Can't connect to database: $DBI:errstr\n";
my $sth = $main::dbh->prepare("
SELECT table_name
FROM user_tables");
$sth->execute();
while (my ($table_name) = $sth->fetchrow_array()){
print "table_name = $table_name\n";
}
Надеюсь, этот фрагмент поможет, и я правильно сформулировал свой вопрос. Позвольте мне сейчас, если мне нужно дать больше информации. Любая помощь очень ценится.