my $running = threads->list( threads::running );