Net::POP3::SSLWrapper - simple POP3S wrapper for Net::POP3
use Net::POP3::SSLWrapper;
pop3s {
my $pop3 = Net::POP3->new('mail.example.com', Port => 995) or die "Can't connect";
if ($pop3->login($YOURMAIL, $PASSWORD) > 0) {
my $msgnum = $pop3->list;
}
$pop3->quit;
};
Net::POP3::SSLWrapper is simple POP3S wrapper for Net::POP3.
You can easy to support POP3S, with very small code change.
tokuhirom <tokuhirom@gmail.com>
This library is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.