Unless I made a mistake somewhere, the following should work fine: 
use strict;
use Net::SMTP;

my $message = join('', <DATA>);
my %hash = (
    'Host'     => '123.456.789.012', # Mail server address
    'From'     => 'me@domain.com',
    'Reply-To' => 'me@domain.com',
    'To'       => 'them@domain.com',
    'Subject'  => 'This is my email subject',
    'Message'  => \$message,
);
mailer(\%hash);

sub mailer {
    my $r = shift;
    print ("From: $r->{'From'}\n" .
                    "To: $r->{'To'}\n" .
                    "Reply-To: $r->{'Reply-To'}\n" .
                    "Subject: $r->{'Subject'}\n\n" .
                    ${$r->{'Message'}});
}

__DATA__
Welcome to my email! This is the
message to be mailed...

-TedPride

[download]
This is a much simplified version of an email script I use to send mailings through my SMTP. I would have tested it before posting, but the SMTP is down atm.

In reply to Re: Mail with Perl by TedPride
in thread Mail with Perl by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.