Hi everybody,

I'm testing a simple IPC implementation that uses Linux pipes to communicate a producer script and a consumer.
The producer script looks like:


while(1){
        print "Hello\n";
        sleep(2);
}


And the consumer:

my @lines;
while(1){
        sleep(10);
        if (<STDIN>){#Non-blocking reading
                print "Reading lines...";
                @lines=<STDIN>;
                print "@lines";
        }else{
                print "No lines received.\n";
        }
}

If I run the producer or the consumer alone, there are no problems.
$./producer.pl
Hello
Hello

$echo "Hello" | ./consumer.pl
Hello

But if I run them together, then de producer does nothing.
$./producer.pl | ./consumer.pl

How can I connect the producer standar output and consumer  standar input?

Thanks in advance,

David,


-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>




Reply via email to