как проверить электронную почту? - PullRequest
0 голосов
/ 31 марта 2011

Я знаю, как отправлять электронную почту ... как мне загрузить мою электронную почту? Я искал на cpan & google & наткнулся на Mail :: POP3Client ... который я не смог заставить работать. У меня есть учетная запись Gmail, но я хочу иметь возможность проверять и другие учетные записи (которые могут быть или не быть всплывающими). ​​

#!/usr/bin/perl
use strict;
use warnings;
use Mail::POP3Client;

 use Mail::POP3Client;

 my $pop = new Mail::POP3Client( USER     => "user",
                               PASSWORD => "pass",
                               HOST     => "pop.gmail.com" );

 for (my $i = 1; $i <= $pop->Count(); $i++) {
    foreach ( $pop->Head( $i ) ) {
      /^(From|Subject):\s+/i and print $_, "\n";
    }
    print "\n";
  }

1 Ответ

3 голосов
/ 31 марта 2011

Для проверки Gmail необходимо использовать SSL:

my $pop = new Mail::POP3Client( USER     => "user",
                               PASSWORD => "pass",
                               HOST     => "pop.gmail.com",
                               USESSL   => true );

Примечание. Вам нужно включить POP в вашем аккаунте Gmail. Вы можете сделать это, выполнив следующие действия:

http://mail.google.com/support/bin/answer.py?answer=13273

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...