$smtp=Net::SMTP->new('your smtp server');
$smtp->mail('your email address');
$smtp->to('Your reciepient');

$smtp->data();
$smtp->datasend("Content-type:TEXT/html,charset=utf-8\n");
$smtp->datasend("To: someone\@somedomain.com\n");
$smtp->datasend("\n");
$smtp->datasend("<html>Your html here!</html>");
$smtp->dataend();
$smtp->quit();