Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re^7: How to tell a child what to do?

by Eyck (Priest)
on Sep 23, 2005 at 07:07 UTC ( #494420=note: print w/ replies, xml ) Need Help??


in reply to Re^6: How to tell a child what to do?
in thread How to tell a child what to do?

I think, that if you rewrite this with sysread/syswrite, or, like in merlyn's solution with length-based communication, it starts working.

This may have something to do with perl's buffering, in particular, when instead of while (<>) I wrote this:

my $q; $q=<STDIN>; print "Received(child $$): $q\n";
it stopped hanging on close($fd).

When I traced what is happening when it hangs, it looks like parent is waiting waitpid(..) (close($fd) on pipe is supposed to do that), while child blissfully unaware is running read...

Now I can safely go and try to understand merlyn's code.


Comment on Re^7: How to tell a child what to do?
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://494420]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (4)
As of 2015-07-04 23:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (60 votes), past polls