Moin!
Wer kennt sich mit Perl aus?
Die Frage ist recht leicht, aber ich kann kein Perl.
Ich habe ein Script welches Formulareingaben verarbeitet und per Email weiterleitet. Innerhalb dieses Scripts befinden sich inzwischen 75 Emailadressen.
Der Code mit dem die Emails aufgebaut und verschickt werden sieht so aus:
open(MAIL,"|$sendmail -t -f $eMail") || die;
print MAIL "To: ich\@meine-domain.de\n";
print MAIL "Bcc: $m1,$m2,$m3,$m4,$m5,$m6,$m7,$m8,$m9,$m10,$m11,$m12,$m13,
$m14,$m15,$m16,$m17,$m18,$m19,$m20,$m21,$m22,$m23,$m24,
$m25,$m26,$m27,$m28,$m29,$m30,$m31,$m32,$m33,$m34,$m35,
(usw. ... ),$m75\n";
print MAIL "From: $eMail\n";
print MAIL "Subject: Anfrage gesendet am ",$Zeit[2],".",$Zeit[1],".",$Zeit[4]," um ",$Uhrzeit[0],":",$Uhrzeit[1],":",$Uhrzeit[2]," h (Nr.$klicks) \n\n";
print MAIL "\n";
print MAIL "\n";
foreach $Feld (@Formularfelder)
Alles anzeigen
Die Empfänger werden also vorher in die Variablen $m1 bis $m75 verpackt und das geschieht im Script. Ein Empfänger mehr und ich muss immer an das Script und das passt mir nicht.
Hat jemand eine Idee, wie ich in der Zeile Bcc die zugehörigen Variablen automatisch immer in vorhandener Anzahl eintrage und die Variablen selbst aus z.B. einer Textdatei laden kann?
Vielen Dank für Eure Tipps, aber nicht vergessen: Perl kann ich so gut wie gar nicht....