I believe there is an error in pop3.pm. When I try to run the following
script, I get an error that says:
"Use of uninitialized value in numeric eq (==) at POP3.pm line 57"
and it won't connect to the server.
#!/usr/bin/perl -w
my $host = "myComputer.myDomain.com";
my $timeout = 30;
my $pop = new Net::POP3( $host, Timeout => $timeout ) || &failed;
print "It worked!";
$pop->close;
exit;
sub failed(
print "\nAuthentication was not successful . POP3 service most likely
down...\n";
exit;
)
I installed Net::POP3 using ppm and reinstalled it to no avail. I have
also tryed it on different machines with ActivePerl versions 5.8.0 and
5.8.7 (both under Windows 2000 and XP) and and the same error pops up.
However, when I change the value of $host to another pop3 server, the
script executes perfectly. Because of this, I'm uncertain as to the
cause of the bug or of any manner of fixing it.
RT for rt.cpan.org