|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Victor 2:5020/400 06 Apr 2002 08:52:13 To : Alexander V. Gaiduk Subject : Re: Как отправить email -------------------------------------------------------------------------------- "Alexander V. Gaiduk" <gav@lesobank.ru> сообщил/сообщила в новостях следующее: news:3caaa2f0$1@cros.lesobank.ru... > > Такой вопрос... Как отправить майл при помощи перла и sendmail. > > Hi all! Еще маленький вопросец. Как проверить ушло письмо или нет? Вариант if(1==open(...)) не проходит.... > > $mta = "/etc/mta/sendmail"; > open(MAIL, "|$mta -oi -t -odq $to") || die "Can't open $mta"; > print MAIL "From: $from\n"; > print MAIL "Reply-to: $from\n"; > print MAIL "To: $to\n"; > print MAIL "Content-Type: text/plain; charset=\"koi8-r\"\n"; > print MAIL "Content-Transfer-Encoding: 8bit\n"; > print MAIL "Subject: Subject string in koi8-r charset\n"; > print MAIL "\n\n"; > print MAIL "Message Body in koi8-r charset\n"; > close(MAIL); - --- Victor ---------- http://dream3d.kulichki.net --- ifmail v.2.15dev5 * Origin: Alkar Teleport News Server (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/1329774ec7457.html, оценка из 5, голосов 10
|