my $thread = threads->create(sub {$obj->run(&MESSAGE)})
    or exit(1);
$thread->join();