Hi,

ich habe einen Server mit Net::Server in Perl programmiert (SMTP-Server). Am Ende soll die Mail an ein PHP Script übergeben werden:

if(open(PIPE, "|/usr/bin/php -q /home/patrick/pipe.php")) {
print PIPE @mail;
close(PIPE);
}

Geht soweit gut, nur das die Verbindung zum Server genau bei "close(PIPE)" beendet wird. Der Hauptserver läuft weiter, nur das Verbindubgs-Child ist einfach beendet. Wenn ich das "close(PIPE)" weglasse, beendet sich die Verbindung nicht, aber das Pipe bleibt offen, das will ich ja nicht.

Woran liegt das? Mache ich etwas falsch? Was?

Patrick