my $thr = threads->create({'context' => 'list'}, \&foo);
    ...
    my @results = $thr->join();