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


ru.perl

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

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 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/18133ab928cd.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional