perl 的多線程與多進程

標籤：man   sub()   情況下   and   tpi   --   結果   next   bsp   

多進程：擁有多個pid，獨立佔用記憶體。

多線程：不具備獨立的pid.

選擇：需要多線程/進程的部分獨立產生結果的時候，不存在共有變數的輸出等情況下可選擇多進程。（注意獨立）。當多線程部分需要返回結果且匯總的時候（非完全獨立），可以選擇多線程模組。

多進程包 ：Parallel::ForkManager

用法樣本：

use Parallel::ForkManager;    my [email protected]; my $pm = Parallel::ForkManager->new($Threshold1);    foreach my $sample(@sample){        $pm->start and next;        sub();        $pm->finish;       }    $pm->wait_all_children; 樣本2 不用包

my $count = 0;
foreach my $sample(keys %hash){
    $count++;
    my $pid = fork;
if($pid == 0){
   {sub()};
   exit;
}
if ($count == $Thread_num){
    my $pid = waitpid -1,0;
    $count-- if $pid > 0;
}
}
while( my $pid = waitpid( -1,0 ) > 0){}

 

perl 的多線程與多進程