perl - Perl でメール サーバーから直接新しいメールを受信する方法

Question

デスクトップにアプリケーションがあり、電子メールのトリガーを介して直接実行したいと考えています。基本的に、サーバーから定期的に新しいメールを取得し、特定のメールの受信時にスクリプトをトリガーするスクリプトが必要です。どのように進めればよいですか、つまり、Perl のどのライブラリが役立つのでしょうか?

私は POP と IMAP のマニュアルを調べましたが、サーバーをリッスンするのに役立つ Perl のライブラリを知りません。

Answer 1

Net::POP3は開始するのに適した場所です...これは彼らのマンページの例です...

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;