Hallo,
nachdem meine forum.pl ihre Arbeit getan hat, rufe ich mit "fork" meine mail.pl auf.
Der "User" soll das gar nicht mehr mitbekommen. (So geht der Eintrag ins Forum halt schneller, wenn er nicht auf das Mailprogramm waren muss.)
Angeblich arbeitet Fork im Hintergrund, aber das funktioniert bei mir nicht. Ich muss in mail.pl immer noch eine Bildschirmausgabe machen, sonst tut sich nichts.
So sieht meine (gekürzte)mail.pl aus:
#!/usr/bin/perl
Einlesen der uebergebenen Variablen
$basedir = $ARGV[0];
$eingetragen = $ARGV[1];
usw....
###E MAILS FUER Forum ABSENDEN
open(EMAIL,"$basedir/$eingetragen") die $!;
@recipient = <EMAIL>;
close(EMAIL);
# Now send mail to $recipient
foreach $recipient (@recipient) {
open (MAIL, "$mailprog $recipient") die "Can't open $mailprog!\n";
print MAIL "From:$host\n";
print MAIL "To: Mitglieder\n";
print MAIL "Subject:$subject (Nr. $num) \n";
print MAIL "Reply-To:(Bitte direkt im Forum antworten)$email\n\n";
usw.....
# Now send mail to $recipient
foreach $recipient (@recipient) {
open (MAIL, "$mailprog $recipient") die "Can't open $mailprog!\n";
print MAIL "From:$host\n";
print MAIL "To: Mitglieder\n";
print MAIL "Subject:$subject (Nr. $num) \n"; print MAIL " ENDE \n";
close (MAIL);
}
########################
Danke für eventuelle Ratschläge