use MIME::Lite;

# simple message, just text:
$msg = MIME::Lite->new(
        From     =>'me@myhost.com',
        To       =>'you@yourhost.com',
        Cc       =>'some@other.com, some@more.com',
        Subject  =>'Hi!',
        Data     =>"The content of the message\n..."
);
[download]