Okay, monks, this code won't work:

Obviously, you don't have relatives who call you on a daily basis with questions like: "My computer ain't working, how to fix it?", or you would know that you don't give much info. I'd be interested in what exactly doesn't work (read: what error do you get?)

Try the following and post the errors:

open(MAIL,"|/usr/sbin/sendmail -oi -t") || die "Can't open sendmail: $
+!";
print MAIL "To: myemail\@myemail.com\n";
print MAIL "From: serveremail\@theserver.com\n";
print MAIL "Subject: Blah\n\n";
print MAIL "Put main message in here.\n"
close (MAIL);
[download]

Update: I should clarify the code a bit for fast readers ;) I added the || die "Can't open sendmail: $!"; part, to make sure the problem is not there. Also I added two backslashes in front of the @-signs to escape these. Otherwise, Perl will thing "myemail.com" and "theserver.com" are arrays. HTH