use threads;
my $t = threads->new(\&execute);
$t->join();