Guest wer

Code (perl): (dl )

1
2
3
4
5

use IO::Handle;

open($self->{MAILP}, '|-', "/usr/sbin/sendmail -t") or die "Kann Mailprogramm nicht ansprechen\n";

$self->{MAILP}->flush;

Ja, so geschrieben, hängt sich mein System nicht mehr auf. Aber es kommt die zweite Mail nicht, die in das PIPE geschrieben wird.

Ein close/open anstelle flush funktioniert jedoch einwandfrei.
Last edited: 2012-11-07 15:47:52 +0100 (CET)