print "Content-type: text/html\n\n";

#mail sent to admin
open (LMAIL, "|usr/sbin/sendmail -t");
print LMAIL("To: $in{myEmail}\n");
print LMAIL ("From: $in{Email}\n");
print LMAIL ("Subject: $in{Form}\n");

print LMAIL ("--------------------\n\n");
print LMAIL("$in{Message}\n\n");

#mail sent to user
open (MAIL, "|/usr/sbin/sendmail -t");
print MAIL<<toEnd;