my $sendmail = "/usr/lib/sendmail -t"
open (MAIL,"|$sendmail");
print MAIL "To: $my_email\n";
print MAIL "From: $my_email\n";