https://www.opennet.ru/openforum/vsluhforumID9/7389.html вот например банальный листинг программы-примера<br>работы с fork<br><br>###############################################################<br>my $pid = fork(); # 'разветвить' текущий процесс<br># fork вернет 0 в потомке и PID потомка в процессе-предке<br>die "fork не отработал: $!" unless defined $pid;<br>unless ($pid) { # процесс-потомок<br> print "Начался потомок PID $$\n";<br> for (1..3) { <br> print "Потомок PID $$ работает $_\n";<br> sleep 2; # 'заснуть' на 2 секунды<br> }<br> print "Закончился потомок PID $$\n";<br> exit;<br>} <br>if ($pid) { # процесс-предок<br> print "Начался предок PID $$\n";<br> for (1..3) { <br> print "Предок PID $$ работает $_\n";<br> sleep 100; <br> }<br> # возможно, здесь нужно ждать завершения потомка:<br> # print "Предок PID $$ ждет завершения $pid\n";<br> # waitpid $pid, 0;<br> print "Закончился предок PID $$\n";<br>}<br>###############################################################<br><br>Допустим у нас это записано в ф https://www.opennet.ru/openforum/vsluhforumID9/7389.html#3 Thu, 29 May 2008 18:04:18 GMT Раскомментируйте строчки с waitpid<br> https://www.opennet.ru/openforum/vsluhforumID9/7389.html#2 Wed, 28 May 2008 13:11:27 GMT При смерти потомка родителю приходит сигнал CHLD - нужно его обработать.<br> https://www.opennet.ru/openforum/vsluhforumID9/7389.html#1 Wed, 28 May 2008 12:17:35 GMT http://www.google.ru/search?hl=ru&q=perl+fork+avoid+zombie<br>