Help for this page
my $LIFETIME_THREADS=100; while (! $TERM) { ... # Wait for any threads to finish sleep(1); }