my $pool = Custom::Utility::ThreadPool->new(maxThreads => 5);
$pool->enqueue(&func, $arg1, $arg2...);
$pool->start;
$pool->blockTillCompletion;