Servus,
hier noch ein Beisiel, dass wirklich klappt.
Man beachte, dass direkt nach print "contetn type......
gleich die nächste anweisung kommt.
Thanks message can go here....
$thanks = qq~
<p align="center"><b><font color="#800000">Thanks</font></b></p>
<p align="center">Your submission has been sent to $recipient</p>
<p align="center">The information you submitted is listed below;</p>
<p align="center"></p>
<p align="center">$sendreport</p>
<p align="center"> </p>
~;
foreach $line (@template)
{
$line =~ s/message/$thanks/;
}
print "Content-type: text/html \n\n";
print qq~