[perl/dbi/mysql] непонятка с кавычками

И всё прочее, что касается HTML
Правила форума
Убедительная просьба юзать теги [code] при оформлении листингов.
Сообщения не оформленные должным образом имеют все шансы быть незамеченными.
vitar
рядовой
Сообщения: 14
Зарегистрирован: 2009-10-13 13:12:35

[perl/dbi/mysql] непонятка с кавычками

Непрочитанное сообщение vitar » 2010-03-17 21:08:45

Выполняю вот такой вот код

Код: Выделить всё

      ...
      my $lip = "10.0.0.1";
      my $query = "SELECT id FROM localips WHERE ip = INET_ATON('".$lip."')";
      print $query."\n";
      my $sqlsi = $dbh->prepare($query);
      $sqlsi->execute() or warn "Can't find record for '$lip'\n";
      ...
получаю

Код: Выделить всё

       SELECT id FROM localips WHERE ip = INET_ATON('10.0.0.1')
       DBD::mysql::st execute failed: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '.0.1))' at line 1 at ./test.pl line 52.
Где я дурак?

PS. Если этот SQL затолкать напрямую в mysql(скажем через phpmyadmin или консольный клиент) - все работает как нада.

Хостинговая компания Host-Food.ru
Хостинг HostFood.ru
 

Услуги хостинговой компании Host-Food.ru

Хостинг HostFood.ru

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [perl/dbi/mysql] непонятка с кавычками

Непрочитанное сообщение hizel » 2010-03-18 9:29:06

Код: Выделить всё

my $sqlsi = $dbh->prepare('SELECT id FROM localips WHERE ip = INET_ATON(?)');
$sqlsi->execute($lip);
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: [perl/dbi/mysql] непонятка с кавычками

Непрочитанное сообщение ProFTP » 2010-03-18 9:41:26

Код: Выделить всё

  my $query = 'SELECT id FROM localips WHERE ip = '.$lip;
      my $sqlsi = $dbh->selectrow_array($query);
print $sqlsi;
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение

Аватара пользователя
thefree
лейтенант
Сообщения: 980
Зарегистрирован: 2008-12-29 9:23:19
Откуда: Весёлая Страна

Re: [perl/dbi/mysql] непонятка с кавычками

Непрочитанное сообщение thefree » 2010-03-18 10:45:00

Код: Выделить всё

INET_ATON('".$lip."')";
Не судите меня строго, Я не волшебник, а только учусь!
http://planetbsd.ru - RSS-агрегатор *BSD по Рунету

vitar
рядовой
Сообщения: 14
Зарегистрирован: 2009-10-13 13:12:35

Re: [perl/dbi/mysql] непонятка с кавычками

Непрочитанное сообщение vitar » 2010-03-18 13:23:00

hizel писал(а):

Код: Выделить всё

my $sqlsi = $dbh->prepare('SELECT id FROM localips WHERE ip = INET_ATON(?)');
$sqlsi->execute($lip);
Спасибо. То что нада :smile:

Одно только уточнение ... если несколько переменнных нужно передать - они пойдут в порядке перечисления?

Аватара пользователя
thefree
лейтенант
Сообщения: 980
Зарегистрирован: 2008-12-29 9:23:19
Откуда: Весёлая Страна

Re: [perl/dbi/mysql] непонятка с кавычками

Непрочитанное сообщение thefree » 2010-03-18 13:49:08

perldoc DBD::Mysql
Не судите меня строго, Я не волшебник, а только учусь!
http://planetbsd.ru - RSS-агрегатор *BSD по Рунету