Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Программирование на языке Perl

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Раскрутка и оптимизация сайта в Интернете" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Апрель 2007   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Автор
Калашников О.А.

Статистика

3 подписчиков
0 за неделю
←   Все выпуски   →

RusFAQ.ru: Программирование на языке Perl


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Perl / Перл

Выпуск № 89
от 18.04.2007, 15:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 173, Экспертов: 21
В номере:Вопросов: 1, Ответов: 3

Вопрос № 82398: Доброе время суток! Подскажите как правильно сделать. Есть вывод из бд (см. код), как его сохранить в фаил?...

Вопрос № 82.398
Доброе время суток! Подскажите как правильно сделать. Есть вывод из бд (см. код), как его сохранить в фаил?

Приложение:

Отправлен: 13.04.2007, 14:50
Вопрос задал: Bichkov Nikola (статус: Посетитель)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Twerdetz
Здравствуйте, Bichkov Nikola!

Собственно, а не проще такой вариант?

$sthl = $dbh->query("id,ts,ip,fromHandle,handle,message from logs");

while (%row = $sthl->fetchhash()){
$id=$row({"id"};
$ts=$row{"ts"} ;
$ip=$row{"ip"} и тд.
} получили значения переменных и делаем с ними, что хотим.

Ну, как бы без "prepare"? Ведь Вы исполняете запрос select, его можно заранее не готовить, учитывая, что он простой?

С уважением,
Twerdetz
Ответ отправил: Twerdetz (статус: 3-ий класс)
Ответ отправлен: 13.04.2007, 15:12
Отвечает: -OC-
Здравствуйте, Bichkov Nikola!
открываете файл на запись open (FILE, ">filename");
оператором print выводите в соотв. дескриптор print FILE "........"; в теле цикла while
закрываете. close FILE;
вот и все :)
Ответ отправил: -OC- (статус: Практикант)
Ответ отправлен: 13.04.2007, 15:13
Отвечает: ramok
Здравствуйте, Bichkov Nikola!

1.
===
26 while ($aref = $sth->fetchrow_arrayref){
===
тут вместо = нужно ==

2.
===
27open (file, ">file.txt")
or die ("Ошибка! Невозможно открыть фаил file.txt")
===
тут после die поставьте ;

3.
===
print "$aref->[0] $aref->[1] $aref->[2] $aref->[3] $aref->[4] $aref->[5]" . " ";
===
вы забыли сказать что пишете это в файл
тоесть так
print file "$aref->[0] $aref->[1] $aref->[2] $aref->[3] $aref->[4] $aref->[5]" . " ";
Ответ отправил: ramok (статус: Практикант)
Ответ отправлен: 15.04.2007, 04:20

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Email: support@rusfaq.ru, тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Версия системы: 4.50 (beta) от 15.04.2007 		Яндекс Rambler's Top100
В избранное