On Monday 22 May 2006 19:05, you wrote:
> Did Graham or anyone ever post an answer to this question?
Yes, Graham and anyone answered on Thursday.
Me wrote on
Thursday 22:07:08
If the Net::POP3 auth() method accepts
a SASL object this should work:
#------usage example--------------
use Authen::SASL 2.10;
use Net::POP3;
my $sasl = Authen::SASL->new( mechanism => 'GSSAPI' );
$pop = Net::POP3->new('pop3host');
$pop->auth($sasl);
my $msgnums = $pop->list; # hashref of msgnum => size
foreach my $msgnum (keys %$msgnums) {
my $msg = $pop->get($msgnum);
print @$msg;
}
$pop->quit;
#------end of usage example--------------
Dennis, please try and let us know if this works!
Achim
