Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     22 Mar 2001  21:58:32
 To : Nikolay Pichtin
 Subject : Re: Mail with attachment
 -------------------------------------------------------------------------------- 
 
 Здравствуй, Nikolay Pichtin.
 
 В твоём письме от Wed, 21 Mar 2001 22:03:25 +0300 написано:
 
 NP>                            Добрый вечер Eugene !
 EZ>> Greetings, "Andrey Lebedev" <andrey@freemail.lt>! You wrote:
 
 >>> Подскажите, как пристегнуть к мылу аттачмент и послать с помощью
 >>> sendmail?
 
 EZ>> perl -MCPAN -e "install MIME::Tools";perldoc MIME::Entity
 
 NP> Человек конкретно спрашивал про sendmail, а ты его куда отправил?
 NP> Может быт у его хостера нет возможности дополнительные модули устанавливать.
 
 NP> То: Андрей, я делал по такому принципу:
 NP> = Вставка =
 NP> $to = '"Your Name" <yourname@yourdomain.com>';
 NP> $recip = 'yourname@yourdomain.com';
 NP> $from = '"Your Name" <yourname@yourdomain.com>';
 NP> $subject = "This is the subject";
 NP> $mainbody = "This is the main body\n";
 NP> $attachment = "This is an attachment\n";
 
 NP> $message = MakeMessage($to, $from, $subject, $mainbody, $attachment);
 
 NP> open (MAIL, "|sendmail -t");
 NP> print MAIL $message;
 NP> close (MAIL);
 
 NP> sub MakeMessage
 NP> {
 NP>     my ($to, $from, $subject, $mainbody, $attachment) = @_;
 NP> my $message = <<"__EOM__";
 NP> From: $from
 NP> To: $to
 NP> Subject: $subject
 NP> MIME-Version: 1.0
 NP> Content-Type: multipart/mixed;
 NP>  boundary=\"----=_NextPart_000_0012_01BDDCAE.46F62A80\"
 NP> X-Priority: 3
 NP> X-MSMail-Priority: Normal
 
 NP> This is a multi-part message in MIME format.
 
 NP> -+----=_NextPart_000_0012_01BDDCAE.46F62A80
 NP> Content-Type: text/plain;
 NP>  charset=\"iso-8859-1\"
 NP> Content-Transfer-Encoding: 7bit
 
 NP> $mainbody
 
 NP> -+----=_NextPart_000_0012_01BDDCAE.46F62A80
 NP> Content-Type: text/plain;
 NP>  name=\"attach.txt\"
 NP> Content-Transfer-Encoding: 7bit
 
 Это если он у тебя text/plain и 7 бит... Чего в оригинальном вопросе не было.
 Так что послали товарища по совершенно правильному адресу.
 
 NP> Content-Disposition: attachment;
 NP>  filename=\"attach.txt\"
 
 NP> $attachment
 
 NP> -+----=_NextPart_000_0012_01BDDCAE.46F62A80--
 NP> __EOM__
 
 NP>     return $message;
 NP> }
 NP> = Вставка =
 NP> -- Hиколай.
 NP> * Фидошник - не человек, это новая форма жизни!
 NP> ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
 NP> ДДД
 -- 
 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: Mail with attachment   Eugene E. Zaitsev   15 Mar 2001 15:50:40 
 Re: Mail with attachment   Nikolay Pichtin   21 Mar 2001 23:03:25 
 Re: Mail with attachment   Artem Chuprina   22 Mar 2001 21:58:32 
Архивное /ru.perl/16483e33414e7.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional