Есть скрипт:
use threads;
sub mon {
for(;;){
....
sleep 60;
}
}
$| = 1;
my $th= threads->create(\&mon)->join();
print "Next...\n";
....
Идея такова: При запуске скрипта функция мониторит некое состояние, и если там что-то не так, вызывает die, если же все ок, то идет дальше по кругу. Проблема в том, что после join() для потока, код который идет после, не выполняется, а ждет завершения, как Я понял, а нужно что бы все шло далее, в то же время поток делал свое дело и не останавливался. Где Я ошибся ?