Perl DBI Ошибка MySQL Msg: Не удается вызвать метод «do» по неопределенному значению

Question

Я пытаюсь запустить простой пример сценария perl dbi для подключения к базе данных mysql и внесения некоторых вставок.

Код:

#! bin/usr/perl -w 

use strict; 
use warnings; 

use DBI(); 
my $dbh = DBI->connect(
    "DBI:mysql:database=SPM;host=IP Address", "username", "password", 
    {'RaiseError'=>1} 
); 

my $dbh->do(
    'INSERT INTO payment_methods(name, description)VALUES(CASH, DOLLAR)' 
); 
my $dbh->disconnect(); 

Но когда я пытаюсь запустить это с помощью perl filename.pl я получаю следующее

Can't call method "do" on an undefined value at perldbi.pl line 12

Вот где я использовал do впервые.

Я пытался использовать это в Google, а также пробовал все разные форумы, но напрасно, если у вас есть какая-то идея относительно того, почему это происходит и что для этого нужно, чем было бы здорово, и я бы действительно ценю вашу помощь.

Answer 1

У вас есть дополнительный my:

my $dbh->do(
    'INSERT INTO payment_methods(name, description)VALUES(CASH, DOLLAR)' 
); 

Избавиться от этого my.

Вы либо на самом деле не warnings включен в сценарии или вы не обращая внимания на предупреждения:

#!/usr/bin/perl 

use strict; 
use warnings; 

my $x = 1; 
my $x = 2; 

C:\Temp> t 
"my" variable $x masks earlier declaration in same scope at ...

Answer 2

Ошибка подключения к вашей базе данных. Таким образом, $dbh не определено.

Обновление: Оба комментария являются правильными. У Синана есть правильный ответ - OP использует мою в каждой строке.

Answer 3

Как указано, ваш DBI->connect вызов не работает. Проверьте настройки подключения, посмотрите, можете ли вы подключиться к базе данных из командной строки и т. Д. В вашем скрипте Perl всегда проверяйте возвращаемое значение DBI->connect(), чтобы узнать, было ли соединение успешным.

my $dbh = DBI->connect("DBI:mysql:database=SPM;host=IP Address",...) 
      or die sprintf('connect() failed. Error: %s', DBI->errstr); 

my $dbh->do(q{ 
    INSERT INTO payment_methods(name, description)VALUES(CASH, DOLLAR) 
}); 
... 

Answer 4

Я сомневаюсь, что это причина сообщения об ошибке, но значения в вставке, вероятно, не так:

VALUES(CASH, DOLLAR) 

, вероятно, следует:

VALUES(\'CASH\', \'DOLLAR\') 

В \ требуется потому что вы используете строку стиля '. Если вы используете строку " стиль вместо этого, вы можете оставить из \:

"... VALUES('CASH','DOLLAR')"