my $html = qq[ Normale Seite ohne Titel

Dieses ist ein formatierter Text in html

 

];                       print SM "From: $email\n";          print SM "To: $in{'email'}\n";                       print SM "Subject: $rsubject $date\n";          print SM "Content-type: text/html\n";                       print SM "\n";# Hier ist der Mail header zu ende!!!!!!!!                       print SM "$html"; close(SM);