my $thread_endless_loop = threads->create(\&endless_loop);

if (!($thread_endless_loop)) {
    my $message = "Main " . __LINE__ . ": Error";
    die("$message Cannot create a thread\n");
}
$thread_endless_loop->detach();