use MIME::Lite::HTML;

my $mailHTML = new MIME::Lite::HTML
 From     => 'foo@bar.org',
 To       => 'bar@foo.org',
 Subject => 'Mail in HTML with images';

$MIMEmail = $mailHTML->parse('http://www.perlmonks.org');
$MIMEmail->send; # or for win user : $mail->send_by_smtp('smtp.foo.org');