Send en mail i text/HTML

Du skal i mailheaderen skrive

Content-type: text/html

Og i body smider du bare HTML-kode. Enkelere kan det ikke være.

clausjul - Yep, men jeg ved ikke hvordan jeg bygger det rigtigt op.. Nu har jeg efterhånden lavet en del forsøg, men er ikke haj til perl..

jeg vil anbefale dig at installere Net::STMP

og så bruge en funktion ala:

sub mail {
  local($email, $subject, $mail, %headers) = @_;

          $smtp = Net::SMTP->new('localhost');

          $smtp->mail();
          $smtp->to($email);

          $smtp->data();
          $smtp->to("falck\@falck-hansen.dk");
          $smtp->cc("falck\@falck-hansen.dk");

          $smtp->datasend("Subject:$subject\n");

          $smtp->datasend("\n");
          $smtp->datasend($mail);
          $smtp->dataend();
        $smtp->quit;

}

Hov du glemte

$smtp->datasend("Content-type: text/html") lige før subject...

Okay..
Hvordan får jeg så sendt selve mailen afsted?
Jeg har Net::SMTP allerede

hm - jeg tror jeg ville encode indholdet af mailen ala

use MIME::Lite;

    ### Create a new multipart message:
    $msg = MIME::Lite->new(
                From    =>'me@myhost.com',
                To      =>'you@yourhost.com',
                Cc      =>'some@other.com, some@more.com',
                Subject =>'A message with 2 parts...',
                Type    =>'multipart/mixed'
                );

    ### Add parts (each "attach" has same arguments as "new"):
    $msg->attach(Type    =>'TEXT',
                Data    =>"Here's the GIF file you wanted"
                );
    $msg->attach(Type    =>'image/gif',
                Path    =>'aaa000123.gif',
                Filename =>'logo.gif'
                );

    $text = $msg->as_string;

http://www.perldoc.com/perl5.8.0/pod/perlfaq9.html#How-do-I-use-MIME-to-make-an-attachment-to-a-mail-message-

Nå, nu fik jeg det til at virke..
Du gav lige lige de rette linier mfalck.. smid et svar hvis du vil have nogle point ;)

ok - fino