Perl und sendmail - amiga-news.de Forum

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

[ - Search - New posts - Register - Login - ]

-1-

[ - Post reply - ]

2003-03-21, 01:16 h

Robin
Posts: 1056
User

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

[ - Answer - Quote - Direct link - ]

2003-03-21, 09:01 h

Solar
Posts: 3680
User

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.

[ - Answer - Quote - Direct link - ]

2003-03-21, 10:35 h

Robin
Posts: 1056
User

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

[ - Answer - Quote - Direct link - ]

2003-03-21, 15:49 h

thomash
Posts: 172
User

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.

[ - Answer - Quote - Direct link - ]

2003-03-21, 18:05 h

Robin
Posts: 1056
User

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

14 Tage News:AMIGA/MorphOS

[ - Answer - Quote - Direct link - ]

2003-03-21, 18:06 h

Robin
Posts: 1056
User

:-D Danke thomash

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

14 Tage News:AMIGA/MorphOS

[ - Answer - Quote - Direct link - ]

-1-

[ - Post reply - ]

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

[ - Search - New posts - Register - Login - ]