Perl批量下載Gmail附件的代碼
更新時間：2014年06月27日 10:52:52 投稿：junjie
這篇文章主要介紹了Perl批量下載Gmail附件的代碼,本文重點在使用Mail::POP3Client模塊和Gmail通信的方法,需要的朋友可以參考下
最近在寫一個從gmail批量下載附件的程序，用到了 Mail::POP3Client 和 MIME::Parser 2 個模塊
實現(xiàn)代碼：
復(fù)制代碼 代碼如下:
use Mail::POP3Client;
use MIME::Parser;
my $U = 'User.Name＠gmail.com';
my $P = 'uSeR.pAsSwORd';
my $X = new MIME::Parser;
$X -> output_dir('C:\\download'); #directory to save attachment
my $G = Mail::POP3Client -> new (
USER => $U,
PASSWORD => $P,
HOST => 'pop.gmail.com',
PORT => 995,
USESSL => 'true') or die "Can't Connect The Server.\n";
for $i (1 .. $G->Count())
{
my $C = $G->HeadAndBody($i);
my $R = $X->parse_data($C);
}
$G->Close();
相關(guān)文章
如果要對使用的lib指定路徑，可以使用下面的語法2013-02-02
perl實現(xiàn)檢測服務(wù)器中的服務(wù)是否正常腳本分享
這篇文章主要介紹了perl實現(xiàn)檢測服務(wù)器中的服務(wù)是否正常腳本分享,本文腳本用于檢測Linux服務(wù)器的服務(wù)是否正常,需要的朋友可以參考下2014-10-10
perl中常用的函數(shù)集合，特分享下，方便需要的朋友2013-02-02
Perl 社區(qū)并不是所有的東西都發(fā)布在 CPAN 上。甚至專門有一個 Module::ThirdParty 模塊記錄這些非 CPAN 的 perl 項目列表。其中最有名的應(yīng)該就屬寫博客的 Movable Type 和做監(jiān)控的 SmokePing 了2013-02-02
這篇文章主要介紹了Perl函數(shù)(子程序)學習筆記,本文講解了函數(shù)定義、函數(shù)返回值、函數(shù)參數(shù)傳遞等內(nèi)容,需要的朋友可以參考下2014-11-11
這篇文章主要介紹了perl中的范圍聲明our-my-local介紹,這3個關(guān)鍵字都是控制變量范圍的,需要的朋友可以參考下2015-02-02
這篇文章主要介紹了Perl中的10個操作日期和時間的CPAN模塊介紹,本文介紹了Date::Manip、DateTime、Time::Format、Time::Interval、Date::Convert、Benchmark、Time::Normalize、Regexp::Common::time等10個模塊,需要的朋友可以參考下2015-02-02
perl高級排序的關(guān)鍵在于要指定排序的方式，使用的操作符是spaceship operator（<=>)2013-02-02
Perl訪問MSSQL并遷移到MySQL數(shù)據(jù)庫腳本實例
這篇文章主要介紹了Perl訪問MSSQL并遷移到MySQL數(shù)據(jù)庫腳本實例,寫了一個完整的遷移腳本和使用方法,需要的朋友可以參考下2014-06-06
perl 處理csv文件的小例子，有需要的朋友可以參考下2013-02-02