Select Code to Download

use Email::Sender::Simple qw(sendmail);
use My::Email::TransportAgent; # returns instance of Email::Sender::Tr
+ansport::SMTP
...
...

sendmail( $email, { transport => My::Email::TransportAgent->new } );