Hvad er fejlen?
Hvad er fejlen i dette mail script?#!/usr/bin/perl
print "Content-type:text/html\n\n";
my $afsender_navn = "Mig";
my $afsender_epost = "mig@test.dk";
my $modtager_navn = "Dig";
my $modtager_epost = "dig@test.dk";
my $emne = "Emne";
my $epost_indhold = "Tekst";
open(MAIL, "|/usr/sbin/sendmail -t") || die "Cannot open sendmail";
print MAIL "From: $afsender_navn <$afsender_epost>\n";
print MAIL "To: $modtager_navn <$modtager_epost>\n";
print MAIL "Subject: $emne\n\n";
print MAIL "$epost_indhold\n\n";
print MAIL "-"x60;
close(MAIL);
print $query->header;
print "Done.";
