У меня есть сценарий Perl который ветвления много подпроцессов. Я хотел бы иметь некоторую функциональность как xargs --max-procs=4 --max-args=1
или make -j 4
, где Perl будет поддерживать данное количество в рабочем состоянии процессов, пока он не будет работать без работы.
Легко сказать, что ветвление четыре обрабатывает и ожидает их всех, чтобы завершить, и затем разветвить еще четыре, но я хотел бы поддерживать в рабочем состоянии четыре или процессы n одновременно, разветвляя новый процесс, как только каждый завершается.
Существует ли простой путь в Perl для реализации такого пула процесса?