Habe hier ein kleines Perl Problem:
Im Internet hab ich diesen Quelltext gefunden. Wenn ich das Programm starte gibt er mir folgende Meldung aus:
No mailer type specified (and no default available), thus can not find executable program. at C:/Perl/lib/Mail/Send.pm line 52
Hier ist der Quelltext:
ZitatAlles anzeigen#!/bin/perl
use Mail::Send;
use strict;
my $mailprog = 'sendmail'; # Spezifiziert den Typ
my $msg = Mail::Send->new() die $!;
# Absender
$msg->set('From','info@thomas-fahle.de');
# Empfänger
$msg->to('Empfaenger@domain.de');
# Noch ein Empfänger
$msg->add('To', 'Empfaenger@anderedomain.de');
# Betreff
$msg->subject('Test Mail::Send');
# Starte Mailprogramm und gib schon mal die Header aus
my $fh = $msg->open($mailprog) die $!;
# Nachrichtenkörper
my $message = "Ein Mail::Send Test\r\n";
$message .= "Erste Zeile\r\n";
$message .= "Zweite Zeile\r\n";
# Schicke den Nachrichtenkörper an das Mailprogramm
print $fh $message;
# Schicke die Nachricht ab
$fh->close() die $!;
exit;
wäre toll, wenn ihr mir dabei helfen könntet