Subject: | smtp timeout |
Mail::Util::maildomain should define short timeout when using Net::SMTP.
my $smtp = eval { Net::SMTP->new($host,Timeout => 5) };
Five seconds or even less should be enough to reach mailhost or localhost.
Default timeout is 120 seconds, for two hosts total is 4 minutes.
Because of this perlbug startup is very big on Windows. As timeout does
not work on Windows, I propose to skip SMTP part on Windows or add
possibility to skip.
--
Alexandr Ciornii, http://chorny.net