I use something like this and it works great. It can also handle attachments. Hope this helps!

use Mail::Sender;

sub MailNotify{
        my $recipients = "their_address\@place.com";
        my $subject = "Greetings";
        my $from = "my_address\@place.com";
        my $mesg = "Do it this way or use a print << EOT";
        my $smtp = "smtp_server.place.com";

        ref ($sender = new Mail::Sender({from => $from ,smtp
         => $smtp})) or die "$Mail::Sender::Error\n";


         (ref ($sender->MailFile(
          {to =>$recipients, subject => $subject,
           msg => $mesg
          }))
          and print "Mail notification sent.\n"
         )
 or die "$Mail::Sender::Error\n";

        $sender->Close; #Close the mail session

        return;
}
[download]