Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Последние темы форума

Показать новые сообщения »

Почтовая рассылка

Подписчиков: 6451
Последний выпуск: 19.06.2015

Не происходит вывод после выборки

10K
11 февраля 2013 года
trinitro
48 / / 14.06.2010
Такие строчки:

Код:
#!/use/bin/perl -w

use Pg;

 $DB = Pg::connectdb("host=10.1.1.1 dbnaame=info user=usr password=123");
 $qry = "SELECT * FROM computers";
 $res = $DB -> exec($qry) or die "Don't connect to Pg\n";

while ( @row = $res -> fetchrow)
{  
    print "$row[0]\n";
}
при выполнении из командной строки (perl script.pl) никаких сообщений, никаких предупреждений, просто перевод строки и всё.
В чём моя ошибка?
396
11 февраля 2013 года
CassandraDied
763 / / 24.05.2012
Ничего не выбрало? Стоить проверить, сколько в res есть строк.
10K
12 февраля 2013 года
trinitro
48 / / 14.06.2010
Дело в том, что этот же код на другой машине на дампе этой же базы, работает. Неясно почему он так ведёт себя на этой машине неясно. БД видна если пытаться пинговать её с проблемной машины.
10K
20 февраля 2013 года
trinitro
48 / / 14.06.2010
РЕШЕНО
У ...user=usr ... не хватало прав на таблицу.

Знаете кого-то, кто может ответить? Поделитесь с ним ссылкой.

Ваш ответ

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог