Help for this page
foreach ( 1 .. $config->{number_of_threads} ) { $q->enqueue(undef); }
while ( my $org = $q->dequeue() ) { ... say "Finishing worker [$thread_id]"; return;