Ich hab jetzt mal alles überflüssige entfernt und nur dieses hier stehengelassen:

open(SM, "|$mail $in{'email'}");
print SM << 'ENDOFDOCUMENT';
From: $email\n"
Subject: $rsubject\n\n
ENDOFDOCUMENT
close (SM);

Und dieses passiert:

Error occurred: 500 - internal server error


Hat denn keiner eine Idee ?