|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 03 Jul 2003 20:41:33 To : ‚« ¤Ё¬Ёp ѓpҐЎҐў Subject : Re: mime::entity, mime::parser -------------------------------------------------------------------------------- Хмутро. AC>> Хмутро. ВГ> Это че? :) Время суток. Кончай переписываться с темплейтами. ВГ>>> Подскажите пожалуйсто, где можно посмотpеть пpимеpы pаботы с ВГ>>> сабджевыми модулями, AC>> В документации на них. ВГ> http://mfl.al.ru/perl-faq/ru-perl-faq-4.html Я сказал "в документации". Т.е. в perldoc MIME::Tools. If all goes well, you will get back a MIME::Entity object ... which consists of... o A MIME::Head (a subclass of Mail::Header) which holds the MIME header data. o A MIME::Body, which is a object that knows where the body data is. You ask this object to "open" itself for reading, and it will hand you back an "I/O handle" for reading the data: this is a FileHandle-like object, and could be of any class, so long as it con- forms to a subset of the IO::Handle interface. ВГ> use MIME::Parser; ВГ> my $parser = new MIME::Parser; ВГ> $parser->output_dir("c:/temp"); ВГ> my $entity = $parser->read(@$msg); # @$msg pеальное письмо полученно ВГ> net::pop3 $entity->dump_skeleton; my $subject = ВГ> $entity->head->get('Subject'); print "This is: ".$subject."."; my $body = ВГ> $entity->body_as_string; print $body; ВГ> Выводит: ВГ> This is subject . ВГ> Content-type: text/plain ВГ> Effective-type: text/plain ВГ> Body-file: c:/temp/msg--455933-1.doc ВГ> А я вpоде как body и subject хотел... ;) Так эта, компутер машина тупая, откуда ему знать, что ты хотел? Ты его попросил развернутое складывать в директорию - он и сложил. С сабжектом вопрос сложнее, но поскольку по крайней мере одну опечатку ты допустил, я делаю вывод, что ты пренебрег cut-and-paste'ом, и по правилу 13-го удара предлагаю искать опечатку в скрипте. Или в письме, где темой было слово "subject". -- Artem Chuprina RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/11477c76a2011.html, оценка из 5, голосов 10
|