no way to compare when less than two revisions

Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

@@ Zeile 1: / Zeile 1: @@
+====== E-Mail-Versand über Perl mit Sendmail ======
+Über Perl ist es möglich, mithilfe des Programms Sendmail E-Mails über den Webserver zu versenden. Zu beachten ist hierbei, dass E-Mails nur versendet werden können, wenn als Absender eine E-Mail-Adresse angegeben wurde, die Sie bereits in Ihrem goneo-Kundencenter als E-Mail-Konto oder als Alias eines E-Mail-Kontos angelegt haben. Folgendes Beispiel können Sie nutzen, um den E-Mail-Versand mittels Perl zu testen. Ändern Sie die im Code angegebene E-Mail-Adresse entsprechend auf die E-Mail-Adresse ab, von der Sie die E-Mail versenden, sowie die Empfängeradresse, an die Sie die E-Mail versenden möchten. Beachten Sie bitte, nach dem Hochladen der Datei in das ''/cgi-bin'' Verzeichnis die Dateiberechtigungen (''chmod'') auf 750 zu setzen.
+<code perl sendmail.pl>
+#!/usr/bin/env perl
+use strict;
+use CGI;
+use Email::Valid;
+my $query = new CGI;
+my $sendmail = "/usr/sbin/sendmail -t -i --from=ihre-e-mail\@beigoneo.de";
+my $absender = "From: ihre-e-mail\@beigoneo.de\n";
+my $empfaenger = "To: ihre-e-mail\@beigoneo.de\n";
+my $betreff = "Subject: Perl Testmail\n";
+my $inhalt = "Testmail mit Perl";
+open(SENDMAIL, "|$sendmail") or die "Fehler: $sendmail: $!";
+print SENDMAIL $absender;
+print SENDMAIL $empfaenger;
+print SENDMAIL $betreff;
+print SENDMAIL "Content-type: text/plain\n\n";
+print SENDMAIL $inhalt;
+close(SENDMAIL);
+print $query->header;
+print "E-Mail versendet";
+</code>