Perl und sendmail - amiga-news.de Forum

amiga-news.de Forum > Programmierung > Perl und sendmail

[ - Suche - Neue Beiträge - Registrieren - Login - ]

-1-

[ - Beitrag schreiben - ]

21.03.2003, 01:16 Uhr

Robin
Posts: 1056
Nutzer

Ich habe ein Problem. Ich moechte sendmail
dazu nutzen durch Perl Mails zu verschicken.
Das hat auch prima geklappt, bis mir mein
Provider ein Update auf einen neuen Server
durchgefuehrt hat. Leider hab ich von sendmail
gar keine Ahnung. Vielleicht hat sich hier
jemand damit auseinander gesetzt ? Und hat
'besseren', funktionierenden Code ?

Mein Code sieht so aus:

@mail=<<TT;
Subject: Test
From: info@amiganiac.de
To: robin@amiganiac.com

test
TT

open(MAIL, "|/usr/lib/sendmail -oi -t -odq") or push @mail, "Failedn";
foreach $nix (@mail)
{
print MAIL $nix;
}
close MAIL;

--
Ueber mir ... AMIGAniac!

14 Tage News:AMIGA/MorphOS

[ - Antworten - Zitieren - Direktlink - ]

21.03.2003, 09:01 Uhr

Solar
Posts: 3680
Nutzer

Von sendmail habe ich keine Ahnung, aber in einem meiner Scripte findet sich ungefähr folgendes:

use MIME::Lite;

my $msg = MIME::Lite->new(
From =>"someone@example.com",
To =>"otherone@example.com",
Subject =>"Some example for MIME::Lite",
Type =>$filetype,
Encoding =>"base64",
Path =>$filename
);
$msg->send;

Das Codebeispiel verschickt eine Datei, aber Text zu verschicken sollte auch nicht schwierig sein. Vielleicht kannst Du damit was anfangen.

[ - Antworten - Zitieren - Direktlink - ]

21.03.2003, 10:35 Uhr

Robin
Posts: 1056
Nutzer

Hmmm ... da werde ich mich wohl mal durch die MIME-Anleitung
schlagen muessen :-) Danke.

Aber wenn jemand doch mehr ueber sendmail weiss waer es
mir doch lieber. Hat ja funktioniert bis zum Umzug.
--
Ueber mir ... AMIGAniac!

14 Tage News:AMIGA/MorphOS

[ - Antworten - Zitieren - Direktlink - ]

21.03.2003, 15:49 Uhr

thomash
Posts: 172
Nutzer

Hi.

Was funktioniert denn nicht mehr bei sendmail ? Gibt es eine Fehlermeldung ?

Versuchs mal hier, da gibt es ein fertiges Formmailer-Perlscript (und mehr):

http://www.scriptarchive.com/

Ansonsten kann es ja sein, daß sich der der Pfad zu sendmail geändert hat. Bei mir sieht das so aus:

$mailprog = '/usr/sbin/sendmail -i -t';
...
# Open The Mail Program
open(MAIL,"|$mailprog");
print MAIL "To: $Config{'recipient'}n";
print MAIL "From: $Config{'email'} ($Config{'realname'})n";
...
usw.

sendmail kann auch unter /usr/bin/sendmail zu finden sein, oder wo ganz anders...

Ciao,
Hoin.

[ - Antworten - Zitieren - Direktlink - ]

21.03.2003, 18:05 Uhr

Robin
Posts: 1056
Nutzer

Gehen tut alles. Also es kommt keine Fehlermeldung.
Aber leider geht die Mail nicht raus.
--
Ueber mir ... AMIGAniac!

14 Tage News:AMIGA/MorphOS

[ - Antworten - Zitieren - Direktlink - ]

21.03.2003, 18:06 Uhr

Robin
Posts: 1056
Nutzer

:-D Danke thomash

Habe es mit den Argumenten deines Beispiels
versucht, und damit gehts :-D
--
Ueber mir ... AMIGAniac!

14 Tage News:AMIGA/MorphOS

[ - Antworten - Zitieren - Direktlink - ]

-1-

[ - Beitrag schreiben - ]

amiga-news.de Forum > Programmierung > Perl und sendmail

[ - Suche - Neue Beiträge - Registrieren - Login - ]