I use Email::MIME with Email::Sender::Simple. Also in this example, the $transport is provided by Email::Sender::Transport::SMTP::TLS.

  
    my $message = Email::MIME->create_html(
        header => [
            To      => $email,
            From    => $from,
            Subject => $subject,
        ],
        body      => $html,
        text_body => $text,
    );

    sendmail( $message, { transport => $transport } );
[download]