なぜかSMTP認証で失敗する。
いろいろ試した結果よくわからずソースを見ると・・・。
Net::SMTPのソースから引用
---
sub auth {
my ($self, $username, $password) = @_;---
eval {require MIME::Base64;} or $self->set_status(500, ["Need MIME::Base64 and Authen::SASL todo auth"]), return 0;
require Authen::SASL;
my $mechanisms = $self->supports('AUTH', 500, ["Command unknown: 'AUTH'"]);
return unless defined $mechanisms;
どおりで認証で失敗するはず。
require Authen::SASL;がevalで囲まれてる。
Authen::SASLをインストールしたらあっさりとおりました。
半日無駄にした。