如何在Gmail中将邮件标记为'阅读'并使用Perl脚本使用Mail :: Webmail :: Gmail删除它们?

时间:2016-10-26 10:30:28

标签: perl gmail-api

使用Perl,我需要在Gmail中阅读邮件,将其标记为'阅读'并删除它们。

我已经尝试了http://search.cpan.org/dist/Mail-Webmail-Gmail/lib/Mail/Webmail/Gmail.pm

中给出的以下代码
use Mail::Webmail::Gmail;
use Data::Dumper;

my $gmail = Mail::Webmail::Gmail->new(
  username => 'user@gmail.com', password => 'password',
);
print Dumper $gmail;

my @labels = $gmail->get_labels();
print Dumper @labels;

my $messages = $gmail->get_messages( label => $labels[0] );
print Dumper $messages;

无法获取标签,消息。 这里缺少什么?

还有其他方法可以在Perl中完成这些任务。

提前致谢。 苏巴

1 个答案:

答案 0 :(得分:2)

That module最后一次更新于2006年,文档说:

  

由于Gmail目前正在进行Beta测试,因此希望此模块在对其界面进行更新时中断。我将尝试使此模块与他们所做的更改保持一致,但是,如果在更新到此模块的最新版本后,您需要的功能仍然无效,请与我联系以解决此问题。

您可以尝试与作者联系,但自上次发布以来已有十年,看起来他似乎失去了兴趣。

但GMail有一个IMAP界面。所以你应该能够用Mail::IMAPClient等模块做你想做的事。