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;