|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 30 Sep 2003 01:50:42 To : Nickson Subject : Re: - HELP MIME ошибка! В чем проблема? -------------------------------------------------------------------------------- Хмутро. N> У меня проблем. Hеобходимо написать скрипт на перле который отправляет N> письма с N> атачами. Я использую MIME. N> #!/usr/bin/perl N> use strict; N> use MIME::Entity; N> my $msg=MIME::Entity->build(From => 'name@name.ua', N> To => 'name@name.ua', N> Subject => 'Test MIME', N> Type => 'multipart/mixed'); N> my $greeting=<<END; N> Hi All N> ldddddddddd N> END N> $msg->attach(Type => 'text/plain', N> Encoding => '7bit', N> Data => $greeting); N> $msg->attach(Type: =>'text/plain',Encoding=>'base64',Description =>'This N> $msg->message',Path=>"$ENV{HOME}/text/text.txt"); N> $msg->send('smtp'); N> И получаю: N> Died at /usr/lib/perl5/site_perl/5.6.1/Mail/Mailer.pm line 270 N> Как решить проблему или посоветуйте через как ешо можно атачить? 1. А слабо посмотреть, что ты на cut-n-past'ил? И отправить в эху то, что на самом деле было в скрипте? 2. Как решить проблему: взять да и оттрассировать падение. Скопировать себе модуль, поменять там падалку на Carp::confess, посмотреть stack trace и переданные аргументы. 3. "ешо атачить" можно с помощью МИМЕ::Лите. Собственно, если тебя интересует только отправление почты, то лучше им и ограничиться. MIME::Entity - это для сложной работы. -- Artem Chuprina RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757 HTTP тоже не каждый дятел может сделать. Только дятлы об этом обычно не знают. Victor Wagner в <b9td98$d8k$3@wagner.wagner.home> --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/11477fc1c52c1.html, оценка из 5, голосов 10
|