Perl批量下載Gmail附件的代碼
更新時(shí)間：2014年06月27日 10:52:52 投稿：junjie
這篇文章主要介紹了Perl批量下載Gmail附件的代碼,本文重點(diǎn)在使用Mail::POP3Client模塊和Gmail通信的方法,需要的朋友可以參考下
最近在寫一個(gè)從gmail批量下載附件的程序，用到了 Mail::POP3Client 和 MIME::Parser 2 個(gè)模塊
實(shí)現(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)文章
perl格式化輸出的一個(gè)例子，使用了chomp，需要的朋友可以參考下2013-02-02
using Net::SSH2 shell 的二個(gè)方法
using Net::SSH2 shell 的二個(gè)方法，供大家參考2013-02-02
Perl中使用File::Lockfile確保腳本單實(shí)例運(yùn)行
這篇文章主要介紹了Perl中使用File::Lockfile確保腳本單實(shí)例運(yùn)行的方法,本文直接給出實(shí)例,方法非常簡(jiǎn)單,需要的朋友可以參考下2014-11-11
這篇文章主要介紹了Perl基本數(shù)組排序方法介紹,本文講解基于ASCII碼排序、比較函數(shù)、按字母順序排列、Perl對(duì)數(shù)值排序等內(nèi)容,需要的朋友可以參考下2015-06-06
Perl字符串處理學(xué)習(xí)備忘錄，包括chop和chomp函數(shù)、getc函數(shù)、拼接字符串、分割字符串、重復(fù)拼接字符串、字串替換等。有需要的朋友，可以參考下2013-02-02
這篇文章主要介紹了perl幾個(gè)文件操作例子,講解了刪除文件、讀取文件、一次性讀取等,需要的朋友可以參考下2014-06-06
perl可以使用JSON模塊很方便的處理json的序列化和反序列化,本文通過一個(gè)簡(jiǎn)單例子給大家介紹的非常詳細(xì),感興趣的朋友跟隨小編一起看看吧2023-12-12
perl pop push shift unshift實(shí)例介紹
perl的pop跟push操作數(shù)組的最右邊，shift跟unshift操作數(shù)組的最左邊2013-02-02
perl控制流介紹(if條件，while,for循環(huán),foreach)
Perl控制流(if條件，while,for循環(huán))，需要的朋友可以參考下2013-02-02
這篇文章主要介紹了Perl學(xué)習(xí)筆記之CPAN使用介紹,本文講解了什么是CPAN、CPAN的目錄作用介紹、CPAN安裝Perl Module的兩種方法等內(nèi)容,需要的朋友可以參考下2015-06-06