Thank you for submitting your school profile to the Core Knowledge Foun= dation. You submitted the following data on: Thursday, August 23, 2007 at 1= 2:19:33, server time.

= asdf<= tr><= /tr>= <= /tr><= /tr><= /tr>
How did you find out about CK? 	please ignore, testing
New = or updated profile? 	New

##</code><code>##

use MIME::Lite;
use MIME::QuotedPrint;
#
#  this part generates $email_body for plain text and $email_html for html text
#
$msg = MIME::Lite->new(
     To    =>$email_to,
     From    =>$email_of_sender,
     Subject =>$email_subject,
     Type    =>'multipart/alternative',
	);
			 
$msg->attach(Type => 'text/plain',
     Data => $email_body
     );

$msg->attach(Type => 'text/html',
     Data => encode_qp($email_html)
      );

$msg->send;