my $h = threads->new(\&mysub);
$h->join;