Subject: | _send_smtp does no mx lookups; @_mx is out of date |
Last night I installed CPANPLUS 0.051 and upgraded Test::Reporter to 1.27 to fix it's win32 MAil::Send issues.
Test reports were being sent out, but never delivered to the cpan-testers list. After further investigation, I think I've found the problem.
_send_smtp simply uses the server entries in @_mx to send the @perl.org email to. The first entry is out of date: mx1.x.perlorg(64.81.84.115), also known as one.develooper.com is no longer an MX for perl.org.
A quick fix would be to update @_mx to current mx records for perl.org.
A more correct way would probably be to have _sned_smtp actually use _get_mx('perl.org') instead.
The root of the problem I think is:
for my $server (@{$self->{_mx}}) {
$smtp = Net::SMTP->new($server, Hello => $helo,
Timeout => $self->{_timeout}, Debug => $debug);
if (defined $smtp) {
$mx = $server;
last;
}
$fail++;
}