|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 09 Apr 2001 12:30:47
To : petrovich@perlyny.net
Subject : Re: Форма по почте
--------------------------------------------------------------------------------
Здравствуй, Петрович.
В твоём письме от Sat, 7 Apr 2001 14:45:25 +0000 (UTC) написано:
ppn> Hу заходи All, коли пришел...
ppn> Подбросьте плиз исходник для отправки мессаги по мылу через сэндмэйл на уже
ppn> определенный адрес с определенной темой. Лично я делал так:
ppn> $mailprog="/usr/lib/sendmail";
ppn> $to = $query->param('recipient');
ppn> $subject = $query->param('subject');
ppn> $text = $query->param('text');
ppn> $from = $query->param('from');
ppn> open(MAIL, "$mailprog -t") || die "Can't open $mailprog!\n";
ppn> print MAIL "To: $to\n";
ppn> print MAIL "From: $from\n";
ppn> print MAIL "Subject: $subject\n\n";
ppn> print MAIL "$text\n";
ppn> При отладке пишет Syntax OK,
Он не может писать Syntax OK при отладке. Он так может писать при компиляции.
ppn> а при запуске - 500 Internal Server Error
ppn> ХЭЛП!
Логи в студию. Кстати, хинт: открытые файлы надо закрывать.
--
Artem Chuprina E-mail: ran@ran.pp.ru
Programmer FIDO: 2:5020/371.32
Memonet Ltd. Phone: +7-095-284-1356
--- ifmail v.2.15dev5
* Origin: NTV Internet (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Форма по почте 
