| 标题 | Perl批量下载Gmail附件的代码 |
| 范文 | 这篇文章主要介绍了Perl批量下载Gmail附件的代码,本文重点在使用Mail::POP3Client模块和Gmail通信的方法,需要的朋友可以参考下。 最近在写一个从gmail批量下载附件的程序，用到了Mail::POP3Client和MIME::Parser2个模块 实现代码： 代码如下: useMail::POP3Client; useMIME::Parser; my$U='User.Name＠gmail.com'; my$P='uSeR.pAsSwORd'; my$X=newMIME::Parser; $X->output_dir('C:\\download');#directorytosaveattachment my$G=Mail::POP3Client->new( USER=>$U, PASSWORD=>$P, HOST=>'pop.gmail.com', PORT=>995, USESSL=>'true')ordie"Can'tConnectTheServer.\n"; for$i(1..$G->Count()) { my$C=$G->HeadAndBody($i); my$R=$X->parse_data($C); } $G->Close(); |
| 随便看 |
|
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板，是学习及工作的有利工具。