|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Alexander V. Gaiduk 2:5020/400 04 Apr 2002 09:51:18 To : Artem Chuprina Subject : Hа: Hа: Как отправить email -------------------------------------------------------------------------------- > AVG> > Такой вопрос... Как отправить майл при помощи перла и sendmail. > AVG> > > > AVG> $mta = "/etc/mta/sendmail"; > AVG> open(MAIL, "|$mta -oi -t -odq $to") || die "Can't open $mta"; > AVG> print MAIL "From: $from\n"; > AVG> print MAIL "Reply-to: $from\n"; > AVG> print MAIL "To: $to\n"; > AVG> print MAIL "Content-Type: text/plain; charset=\"koi8-r\"\n"; > AVG> print MAIL "Content-Transfer-Encoding: 8bit\n"; > AVG> print MAIL "Subject: Subject string in koi8-r charset\n"; > AVG> print MAIL "\n\n"; > AVG> print MAIL "Message Body in koi8-r charset\n"; > AVG> close(MAIL); > > Вот пользовался бы ты MIME::Lite - не забыл бы MIME-Version. Без которого это > не MIME, и тебя имеют право не понять. по крайней мере из более 300 абонентов подписки никто не высказал своих претензий. ты прав, дописать туда print MAIL "Mime-Version: 1.0\n"; наверное стоит. хотя приходит много спама, у которого про миму упоминаний нету. правда я почту имею чере MSOE 5.5 - наверное по этому читается все. > > -- > Artem Chuprina > Communiware.net > RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/11999351a0d4f.html, оценка из 5, голосов 10
|