очередь процесса жемчуга

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

Легко сказать, что ветвление четыре обрабатывает и ожидает их всех, чтобы завершить, и затем разветвить еще четыре, но я хотел бы поддерживать в рабочем состоянии четыре или процессы n одновременно, разветвляя новый процесс, как только каждый завершается.

Существует ли простой путь в Perl для реализации такого пула процесса?

5
задан brianegge 6 August 2010 в 14:35
поделиться