如何在Perl中直接从电子邮件服务器接收新电子邮件

如何在Perl中直接从电子邮件服务器接收新电子邮件,perl,imap,pop3,email-client,Perl,Imap,Pop3,Email Client,我有一个应用程序放在桌面上,我想通过电子邮件的触发器直接运行它。基本上,我需要一个脚本,它可以定期从服务器获取新邮件,并在收到特定邮件时触发我的脚本。 我应该如何继续,或者换句话说,Perl中的哪些库可以提供帮助 我已经阅读了POP和IMAP手册…我只是不知道有一个Perl库可以帮助我收听服务器。是一个很好的开始。。。这是他们主页上的一个例子 use Net::POP3; $pop = Net::POP3->new('pop3host'); $pop = Net::POP3->new

我有一个应用程序放在桌面上,我想通过电子邮件的触发器直接运行它。基本上,我需要一个脚本,它可以定期从服务器获取新邮件,并在收到特定邮件时触发我的脚本。 我应该如何继续,或者换句话说,Perl中的哪些库可以提供帮助

我已经阅读了POP和IMAP手册…我只是不知道有一个Perl库可以帮助我收听服务器。

是一个很好的开始。。。这是他们主页上的一个例子

use Net::POP3;
$pop = Net::POP3->new('pop3host');
$pop = Net::POP3->new('pop3host', Timeout => 60);
if ($pop->login($username, $password) > 0) {
    my $msgnums = $pop->list; # hashref of msgnum => size
    foreach my $msgnum (keys %$msgnums) {
        my $msg = $pop->get($msgnum);
        print @$msg;
        $pop->delete($msgnum);
    }
}
$pop->quit;

@米克彭宁顿。。。只是编辑我不是在寻找解决方案。我只能选择合适的库或包through@MikePennington... 当我尝试创建一个对象$pop….Perl给它未定义的值时,我已经安装了Net::POP3模块,有什么原因吗behaviour@Dilletante您是如何安装Net::POP3的?测试是否失败?@Dilletante,您需要使用邮件服务器的主机名而不是“POP3主机”。