Funktioniert einfach nicht

[Volker]

Was wäre an diesem Prg falsch?

#!/usr/bin/perl
$Mailprogramm = "/usr/bin/sendmail"; 
$MailSubject = "Formluar-Feedback";  
$Empfaenger = "[e-mail]";
print "content-type: text/html \n\n";
if (not(-x $Mailprogramm)){
  print "nicht geklappt";
  exit;
}
open(MAIL,"$Mailprogramm -t") die;
print MAIL "To: $Empfaenger\n";
print MAIL "From: Mir\n";
print MAIL "Subject: Hallo\n\n";
print MAIL "Beispieltext";
print "alles geklappt";