my $test = sub { ... }; threads->create( $test, ...