DB<12> 
Net::SMTP::auth(/usr/local/lib/perl5/site_perl/5.8.8/Net/SMTP.pm:117):
117:        my $mechanisms = $self->supports('AUTH',500,["Command unknown: 'AUTH'"]);
  DB<12> 
Net::SMTP::auth(/usr/local/lib/perl5/site_perl/5.8.8/Net/SMTP.pm:118):
118:        return unless defined $mechanisms;
  DB<12>