#perl - Tue 13 Mar 2007 between 14:34 and 14:38



Davemanand/or
rmahblowing things up can be fun
LeoNerddazjorz: oops. [grin] one moment
DavemanYES!
dazjorzLeoNerd: top line reads: 295 perl emul(netbsd)
rmahI'm glad I'm not a kid these days
Davemanhaw
dazjorzLeoNerd: after that just thousands of wait4()
rmahI'd definately be in jail
Davemanjailbait++
rmah, on that note, I'm glad I can't go to jail [yet]
;)
rmahDaveman: um, in vernacular english, "jailbait" typically refers to nubile young girls below the legal age of consent
dazjorzLeoNerd: also check the paste, http://sial.org/pbot/23470, maybe it's wait4()ing for that process :)
LeoNerddazjorz: oooooh oops.
Davemanrmah, or the contra
LeoNerddazjorz: Can you change the line that goes something like last if $kid == -1 to last if $kid < 1
I wasn't aware of the == 0 case
To quote perldoc:
dazjorzheh, okay
LeoNerd"On some systems, a value of 0 indicates that there are processes still running."
Perhaps that's a BSDism
rmahLeoNerd: now you know why you should always read the perldoc :-)
dazjorzlast if !defined $zid or $zid == -1;
?
LeoNerdThat's the one
Make it last if !defined $zid or $zid < 1;
dazjorzokay
Davemananyway, rmah, is there no module which interfaces async operations into something like Server?
dazjorzlast if !defined $zid or $zid < 1; # it is. :)
LeoNerdYeah.. that's what it was...
rmahDaveman: threads or coroutines
cpan for Coro for the latter
dazjorzLeoNerd: that works just great! thanks a lot! :D
LeoNerdYou have 2 childs running; one dies, so we get waitpid() returns $zid, then we call waitpid() again and it returns 0 to say "that's all for now but some children remain"
actiondazjorz huggles LeoNerd
dazjorzhuggles LeoNerd
Daveman:\
dazjorzLeoNerd++
LeoNerdAs opposed to -1 to say "no children left"
Daveman:o

Page: 4 11 18 25 32 39 46 53 60 67 74 81 88 95 102 

IrcArchive