[Moscow.pm] $SIG{CHLD}

[Alexey Shrub]

Привет всем,

заметил что в доках неполные примеры для обработки сигнала CHLD, тут
http://perldoc.perl.org/perlipc.html#Signals
дано три примера,, первый блокирующий - неактуально для меня, второй 
якобы не учитывает CHLD от внешних команд, третий типо учитывает, но он 
уже не содержит цикла while и поэтому не обработает несколько 
одновременных сигналов (если сразу несколько потомков померло) т.е. 
второй нужно скрещивать с третьим.
Мало того, там не описано что CHLD может приходить и в случаях отличных 
от смерти дитя, это написано тут
http://docstore.mik.ua/orelly/perl/cookbook/ch16_20.htm
попробовал скрестить всё рекомендации и получил
https://gist.github.com/2724846

Вроде всё работает верно, но вдруг чего-то упустил, есть у кого замечания?

-- 
Alexey Shrub