use strict;
use warnings;
use MIME::Lite;
my $msg = MIME::Lite->new(
        From    => "myemail@domain.com",
        To      => "somebody@gmail.com",
        Subject => "Some Subject",
        Data    => "Some long message",
);

$msg->send();