码迷,mamicode.com
首页 > 编程语言 > 详细

perl 的多线程与多进程

时间:2018-05-04 17:09:33      阅读:266      评论:0      收藏:0      [点我收藏+]

标签:man   sub()   情况下   and   tpi   --   结果   next   bsp   

多进程:拥有多个pid,独立占用内存。

多线程:不具备独立的pid.

选择:需要多线程/进程的部分独立生成结果的时候,不存在共有变量的输出等情况下可选择多进程。(注意独立)。当多线程部分需要返回结果且汇总的时候(非完全独立),可以选择多线程模块。

多进程包 :Parallel::ForkManager

用法示例:

use Parallel::ForkManager;    
my $Threshold1=@sample;
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 的多线程与多进程

标签:man   sub()   情况下   and   tpi   --   结果   next   bsp   

原文地址:https://www.cnblogs.com/gui-/p/8990877.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!