Windows 2000 og Perl

Du kan vel bruge Net::SMTP eller modulet på http://alma.ch/perl/mail.htm

use Net::SMTP;

#disse variable er kun med for nemhedsskyld, du kan fint skrive
#informationerne direkte i funktionskaldene
$mydomain=\"mydomain.dk\";
$myaccount=\"mail\";
$myname=\"Mit fulde navn\";
$myrecipientname=\"Modtagerens fulde navn\";
$myrecipient = \'user@otherdomain.dk\';

$smtp = Net::SMTP->new(\"mail.$mydomain\",
        Hello => \"www.$mydomain\",
        Timeout => 30);      # opret en forbindelse til serveren
$smtp->mail( \"$myaccount\\@$mydomain\" );    # hvem er afsenderen (e-mail adresse)
$smtp->to($myrecipient); # modtagerens e-mail adresse
$smtp->data(); # Start the mail

# Send header informationer.
$smtp->datasend(\"To: \\\"$myrecipientname\\\" <$myrecipient>\\n\");
$smtp->datasend(\"From: \\\"$myname\\\" <$myaccount\\@$mydomain>\\n\");
$smtp->datasend(\"\\n\");#tom linie der indikerer at der ikke er flere headers

# Send body.
$smtp->datasend(\"Her indsættes teksten i mailen\");
$smtp->datasend(\"mere text......\");
$smtp->datasend(\"mvh\\n$myname\");
$smtp->dataend(); # Finish sending the mail
$smtp->quit;# Close the SMTP connection

??

I Windows kan man ikke bare åbne en process til sendmail, som i Unix, men skal bruge et modul (skrevet i C, som håndterer det) - som thomasledet foreslår.

Jeg foreslår nu at bruge Mail::Sendmail (kan hentes på www.cpan.dk).

Fra det modul, kan du se enten vælge et bruge maskinens lokale SMTP-server (men den skal først sættes op!), eller bruge en ekstern SMTP-server.