Please do not recommend random Perl scripts on the web without having verified them. The script that you recommended contains ugly errors that make it easy to send spam via the script:

...

$Email = $in{'Email'};
$Message = $in{'Message'};

...

sub SendAutoReply {
open (MAIL,"|$MailProgram -t");
print MAIL "To: $Email\n";
print MAIL "From: $YourEmail\n";
print MAIL "Subject: $Subject\n";
print MAIL "$Header\n";
print MAIL "$Date\n\n";
print MAIL "$Subject\n\n";
print MAIL "You sent the following:\n\n";
print MAIL "==============================\n\n";
print MAIL "Name: $Name\n";
print MAIL "Email: $Email\n\n";
print MAIL "Message:\n\n";
print MAIL "$Message\n\n";
print MAIL "==============================\n\n";
print MAIL "$TailMessage\n\n";
print MAIL "Best regards,\n\n\n";
print MAIL "$Signature1\n";
print MAIL "$Signature2\n\n";
close (MAIL);
}

[download]

If $Email contains a newline, you can spam any address through this form (and it is nowhere verified that $Email doesn't contain a newline and more data). Of course, there will be some fluff data trailing the spammers message, but if the spammer cared, he would have a different profession.

Update: Finished incomplete sentence about verification of $Email

The intent was to show the OP how easy it was to find information on the subject through Google. I neither recommended nor endorsed the script.

Update: Ending digressive conversation here.
--------------
It's sad that a family can be torn apart by such a such a simple thing as a pack of wild dogs

Anyway, a search would have been nice...
when using Super Search, you could find enough info to create a simple scritp, and if it is to hard, the Perl Babysteps 1: Your First Simple Script would be a nice start.

Whilst I wouldn't want to discourage you from learning Perl , when it comes to form to email programs I would gently guide you toward NMS to find something that has already been done. This wheel has been invented many times before and a lot of mistakes have been made and remedied.

/J\

I always use Mail::Sendmail for the purpose of sending mail. Easy to use, works great.

As far as generating the HTML, for this you can probably just embed entire web pages into heredocs, so that your web pages are *almost* static, but then you can just interpolate any particulars you need. That technique will not be adequate for more complicated purposes, when the page needs to be more fully dynamic, but here you've basically only got two or three pages: a form for the user to fill in, a "sent" message, and possibly a "failed" message. They don't need to change much, other than (say) interpolating an error message.

Update: Be sure to hardcode the To: address, so that spammers can't abuse your script to send to arbitrary recipients.