my $ServerName = SMAILSVR};
$smtp = Net::SMTP->new($ServerName)
my $MailFrom = 'postmaster\@testme.com';
my $MailTo1 = testmeuser@home.com};
my $MailTo2 = testmeuser1@home.com};
$smtp->mail( $MailFrom );
$smtp->to( $MailTo1 );
$smtp->to( $MailTo2 );
$smtp->data();
$smtp->datasend();
$smtp->quit();