Select Code to Download

    my ($thr) = threads->create('foo');
    ...
    my @results = $thr->join();

    use threads 1.31;

...
    foreach my $thr (threads->list()) {
        my $rc = $thr->join();
    }