Hi hankcoder,

I'd recommend you leave the work of creating and sending an email to a module. Email::Sender (with Email::Simple) is just one of many. Something like this (based on Email::Sender::Manual::QuickStart):

use warnings;
use strict;
use Email::Sender::Simple qw/sendmail/;
use Email::Simple;

my $email = Email::Simple->create(
    header => [
        To      => '"Xavier Q. Ample" <x.ample@example.com>',
        From    => '"Bob Fishman" <orz@example.mil>',
        Subject => "don't forget to *enjoy the sauce*",
    ],
    body => "This message is short, but at least it's cheap.\n",
);

print $email->as_string; # debug
sendmail($email);
[download]

Hope this helps,
-- Hauke D