sub send_confirmation_email
{
my %mail = (
		From 	=> "pperry1\@comcast.net",	# YOU SHOULD CHANGE THIS!
		To 		=> $email,
		Subject => "Event Registration Form Submitted",
		Message => ""
);
my $page;

		$mail{Message} = <<EOF;
Thank you for your inquiry.  A tennis staff member will reply to you within 24 hours.

This is the information you submitted.


Member Name:  $name
Member ID:   $memberid
Telephone:     $phone
Email Address: $email
Guest Name(s):  $guest
Event Date:  $eventdate
Events:  $event
Payment:  $payment

Message:     $message


EOF

	sendmail (%mail)
		or $page .= p (escapeHTML ("Oops, failure sending mail to $mail{To}"));

	return (defined ($page) ? $page : "");
}
#@ SEND_CONFIRMATION_EMAIL