|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : ‚« ¤Ё¬Ёp ѓpҐЎҐў 2:5059/4.2 03 Jul 2003 18:27:02 To : Artem Chuprina Subject : Re: mime::entity, mime::parser -------------------------------------------------------------------------------- Здравствуй Artem! (Вторник Июль 01 2003), Artem Chuprina писал к Владимиp Гpебнев: AC> Хмутро. Это че? :) ВГ>> Подскажите пожалуйсто, где можно посмотpеть пpимеpы pаботы с ВГ>> сабджевыми модулями, AC> В документации на них. http://mfl.al.ru/perl-faq/ru-perl-faq-4.html 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 хотел... ;) С уважением, Владимир (aka Док - admin@russiadesign.com) http://www.russiadesign.com http://www.cmdgroup.ru ... http://totalizator.rhk.ru - азартные игры,карты,лотереи, мгновенная оплата --- Лучший сайт - http://localhost; [VGPR-RIPN, ЛОКОмотив, LINUX], [HATE NATO] * Origin: Perl, *SQL, http, Delphi, asm,...etc ALL - mizdom@chat. (2:5059/4.2) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/22693f04757c.html, оценка из 5, голосов 10
|