#!/usr/local/bin/perl
use strict;
use warnings;
use Parallel::ForkManager;

my $pm = new Parallel::ForkManager(24);
$pm->set_waitpid_blocking_sleep(0);
...