Net::SMTP can handle TLS Stuffs also.

you can also increase the log level upto 14 in Net::SMTP module and you can get more detail on STARTTLS command mode.

use Mail::Sendmail;

  %mail = ( To      => 'you@there.com',
            From    => 'me@here.com',
            Message => "This is a very short message"
           );

  sendmail(%mail) or die $Mail::Sendmail::error;

  print "OK. Log says:\n", $Mail::Sendmail::log;
[download]

I tried again and couldn't figure out how to make Net::SMTP do TLS. Isn't that some sort of encryption? In the module it says:

    # We dont support sasl mechanisms that encrypt the socket traffic.
    # todo that we would really need to change the ISA hierarchy
    # so we dont inherit from IO::Socket, but instead hold it in an at
+tribute
[download]

jesuashok is wrong, neither Net::SMTP nor Mail::Sender support STARTTLS. Net::ESMTP says it does, but I've never used this module, so can't say how well it works.

SASL and TLS are two very different things. SASL implements secure authentication over insecure channels (e.g. via Digest-MD5 passwords), whereas TLS encrypts an entire network transaction with SSL.


Debugging is twice as hard as writing the code in the first place. Therefore, if you write the code as cleverly as possible, you are, by definition, not smart enough to debug it. -- Brian W. Kernighan