Select Code to Download

Unknown callback: 'authname'. (user|auth|language|pass)

  use Net::SMTP;
  use Authen::SASL;
...
  $NetSMTP->datasend('test text');
  $NetSMTP->dataend();
  $NetSMTP->quit;