Как я могу уничтожить целое дерево процесса с Perl?

Select (columns Name or Functions (Max , Min , Sum ...) 1 , 2 , ...) 
INTO (Destination table)
From (Source table)
GROUP BY (cloumns Name 1 , 2 , ...)
7
задан tshepang 10 April 2014 в 19:33
поделиться

2 ответа

Если можно жить с уничтожением группы процесса, можно использовать следующее:

kill -$signum, $pgid;

где $signum число сигнала, и $pgid идентификатор группы процесса. Однако числа сигнала не являются очень портативными, в этом случае Вы можете (на некоторых платформах; читать perlfunc для объяснения), делают следующее (для отправки SIGTERM, например):

kill 'TERM', -$pgid;
9
ответ дан 6 December 2019 в 11:54
поделиться

CPAN имеет ответ. Да, я знаю, что Вы не хотели устанавливать дополнительные модули, но по крайней мере можно посмотреть на реализацию и видеть то, что они делают...

https://metacpan.org/pod/Proc:: ProcessTable

8
ответ дан 6 December 2019 в 11:54
поделиться
Другие вопросы по тегам:

Похожие вопросы: