sendmail

[mayas]

Hallo Leute
Kann mir jemand sagen wie ich ein Attechment mit dem Sendmail versenden kann.
Danke und Gruss
Mayas

[Abraxax]

sendmail schickt nur die mail weg.
deine bearbeitung passiert schon vorher.
schaue dir das SMTProtokoll mal an.

[mayas]

Hallo Abraxax
Ich habe ein script der sieht so aus. Kann ich da das File nicht einfügen?
Mit dem SNMPProtokel weiss nicht genau wo :-(

open (SENDMAIL, "|/usr/lib/sendmail -oi -t -odq") or
       die "Kann sendmail nicht fork()-en: $!\n;
print SENDMAIL <<"EOF";
From: Absender <mein\@mail.ch>
To: Empfaenger <dein\@mail.ch>
Subject: Logfile vom Backup nachsehen
==>Attachement: <pfad>
Der eigentliche Text kommt hierhin
Und noch eine Zeile wenn man will.
EOF
close (SENDMAIL) or warn "Pipe zu Sendmail unsanft beendet";

[Abraxax]

schaue doch einfach das protokoll an, dann weisst du es ...

willst du mit php eine mail verschicken? wenn ja, nutze direkt die fkt mail()

bei den code-schnipseln ist auch was dabei, um eien mail mit attachment zu versenden.

[mayas]

Nein nicht über php sonder über ein perlscript aus einer unix maschine aus
kannst du mir sagen wo ich das protokoll finde

[Abraxax]

mit google?

http://www.google.de/search?q=rfc+sm...-8&hl=de&meta=

[mayas]

danke für deine hilfe aber ich habe immer noch keine ahnung wie das gehen soll ich habe auch das rfc 2821 nachgelesen

[Abraxax]

wie genau es geht, kann ich dir auch nicht sagen. schon gar nicht in perl....

ich verschiebe dich auch direkt mal dahin.... da solltest du hilfe bekommen...

*VERSCHIEB*

[Abraxax]

bitte unterlasse auch in zukunft ein *CROSSPOSTING*
thx.

[mayas]

Sorry wegen *CROSSPOSTING* bin noch neu in solchen foren.
Aber kann mir wirklich niemand helfen

[wahsaga]

Original geschrieben von mayas
Aber kann mir wirklich niemand helfen

auch wenn du noch neu bist, sollte dir klar sein, dass man nicht schon nach nur einer(!) stunde anfängt nachzufragen und zu quengeln.

[Wotan]

Habe ich mir mal aus eine Scrpt ausgeborgt:

# You may not need to change the $mailprog variable.
# Try it as is first. If it doesn't work try putting a # in
# front of the first line below and remove the # on the
# second line. If that fails, try the removing the # on
# the third line and put a # in front of the other two.
# If that fails, ask your administrator where the sendmail
# program is on your system.

	$mailprogram = '/usr/sbin/sendmail';
	# $mailprogram = 'usr/lib/sendmail';
	# $mailprogram = '/usr/bin/sendmail';

# Enter the e-mail address where you want to receive
# the messages from your visitors.
# Depending on the version of PERL you are using, you should
# be able to just use your straight e-mail address. If
# not you MAY have to escape the @ with a \ like this
# you\@youremail.com

	$myemail = 'you@youremail.com';

# Send e-mail to you

	open (MAIL,"|$mailprogram -t");
                print MAIL "To: $myemail\n";
                print MAIL "From: $sender\n";
                print MAIL "Subject: $subject\n";
	print MAIL "Message from $username\n\n";
	print MAIL "$message\n\n";
	close(MAIL);

Um jetzt ein Anhang mit rein zupacken, mjusst du den Header ändern.
Hier mal ein Schnippsel aus einen PHP-Script von mir:

$boundary = strtoupper(md5(uniqid(time())));
$mail_header  = "From:$from(Sales)\n";
$mail_header .= "MIME-Version: 1.0";
$mail_header .= "\nContent-Type: multipart/mixed; boundary=$boundary";
$mail_header .= "\n\nThis is a multi-part message in MIME format  --  Dies ist eine mehrteilige Nachricht im MIME-Format";
$mail_header .= "\n--$boundary";
$mail_header .= "\nContent-Type: text/plain";
$mail_header .= "\nContent-Transfer-Encoding: 8bit";
$mail_header .= "\n\n$message";
$file_content = fread(fopen($file,"r"),filesize($file));
$file_content = chunk_split(base64_encode($file_content));
$mail_header .= "\n--$boundary";
$mail_header .= "\nContent-Type: application/octetstream; name=\"$file_name\"";
$mail_header .= "\nContent-Transfer-Encoding: base64";
$mail_header .= "\nContent-Disposition: attachment; filename=\"$file_name\"";
$mail_header .= "\n\n$file_content";
$mail_header .= "\n--$boundary--"; 

Jetzt musst du nur noch die beiden Sachen zusammenbauen und schon kannst du mit Perl eine eMail versenden mit Anhang!

OffTopic:

---

Nur weil ich heute gute Laune habe.

---

[mayas]

also danke für eure hilfe aber ich habe es jetzt mit dem modul MIME::Lite die ganze sache gelöst.
gruss mayas