$msg = MIME::Lite->new(
        ...,
        Type => 'multipart/mixed'
    );

##</code><code>##

    $msg = MIME::Lite::TT::HTML->new(
        ...,
        Type => 'multipart/mixed'
    );