zapisywanie załączników IMAP

Article View: pl.comp.lang.perl

Article #52321

#52321

From: ŁR
Date: Sun, 27 Nov 2011 12:47

18 lines
1422 bytes

Witam szanowne grono.
Próbuję napisać swój pierwszy skrypt w Perlu i niby wszystko ok tylko że 
poniższe linijki zapisują mi wszystko łącznie z załącznikami i treścią 
wiadomości. Chciałbym z maila tylko załączniki. Proszę o jakąś sugestię 
jak zapisać tylko załączniki. Udało mi się to zrobić pośrednio przez 
usunięcie z kat. pliów z msg i zostawieniu tylko załączników, ale 
wygląda mi to na półśrodek :)

     my $parser = new MIME::Parser;

     $parser->output_dir($tmpdir);
     $parser->output_prefix("msg");
     $parser->tmp_dir("$tmpdir/tmp");
     $parser->parse_data($imap->message_string($i[0]));

-- 
Pozdrawiam
Łukasz

Technical Details

Message-ID: <4ed23147@news.home.net.pl>

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!nf1.ipartners.pl!ipartners.pl!news.home.net.pl!not-for-mail

Show Full Headers

Complete Article Headers

Date: Sun, 27 Nov 2011 13:47:02 +0100
From: ŁR <lukaszTylkO@WyTNIJrostalski.pl>
User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:8.0) Gecko/20111105 Thunderbird/8.0
MIME-Version: 1.0
Newsgroups: pl.comp.lang.perl
Subject: zapisywanie załączników IMAP
NNTP-Posting-Host: 94.40.64.237
Message-ID: <4ed23147@news.home.net.pl>
X-Trace: news.home.net.pl 1322398023 94.40.64.237 (27 Nov 2011 13:47:03 +0200)
Organization: home.pl news server
Lines: 18
X-Authenticated-User: lukasz.rostalski@im.pl
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!nf1.ipartners.pl!ipartners.pl!news.home.net.pl!not-for-mail
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit