Email senden an nicht sichtbare Empfänger

[Frank Schönmann]

hi!

sub SendPAFEmail {
  open (MAIL,"/usr/lib/sendmail -t") die print "Content-type: text/html\n\n";

Also diese Zeile sieht sehr falsch aus. die() erwartet selbst einen
Parameter, den es dann ausdruckt, da kannst du nicht einfach ein
print() dahintersetzen. Und den -Operator würde ich durch den
weniger bindenden or-Operator ersetzen:
  open MAIL, "/usr/sbin/sendmail -t" or die "fehlermeldung";

print MAIL <<EOT;

print MAIL <<"EOT";
Ist sicherer mit "-Zeichen als ohne, denn dann weißt du, was er macht.

To: "[e-mail]";
Cc: "[e-mail]";

Weg mit den Anführungszeichen und weg mit den Semikola. Ich glaube,
du hast hier deine print()'s nicht richtig entsorgt.

From: "Gästebuch"
Reply-to: "No Reply"

?? Wo hast du denn das her? :)

Subject: Huhu

Hallo PAF und bla, foo und restliches Zeugs als Text

Hier fehlt vor dem Ende der Subfunktion ein EOT als Abschluss für
dein obiges "print MAIL <<EOT;".

}

Also bitte mal verbessern und dann erneut probieren :)

bye, Frank!