|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 03 Apr 2002 19:19:29
To : "Alexander V. Gaiduk"
Subject : Re: Hа: Как отправить email
--------------------------------------------------------------------------------
Здравствуй, Alexander V. Gaiduk.
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, и тебя имеют право не понять.
--
Artem Chuprina
Communiware.net
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
--- ifmail v.2.15dev5
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
