Jak działa system wątków Perla?
Dokumentacja Perla mówi:Od wersji Perl 5.8 programowanie wątków jest dostępne za pomocą modelu zwanego wątkami interpretera, który zapewnia nowy interpreter Perla dla każdego wątku
Za pomocąps -Lm <pid>
W poniższym programie widzę, że wątki działają równolegle, tzn. są uruchamiane w tym samym czasie w różnych rdzeniach. Ale nawet gdy są 4 wątki (3 i główny)ps aux
pokazuje tylko jeden proces Perla.
use threads;
$thr = threads->new(\&sub1);
$thr2 = threads->new(\&sub1);
$thr3 = threads->new(\&sub1);
sub sub1 {
$i = 0;
while(true){
$i = int(rand(10)) + $i;
}
}
$thr->join;