perl多线程

PERL 多进程与多线程编程能大大加快程序执行效率（将一个任务分割成若干小任务并行处理）。要进行多进程和多线程编程则分别需要两个模块, fork()和Threads，然而fork（）则为PERL内置函数，因此，只需安装Threads模块（如需变量共享，还需安装Thread::Shared模块）。安装方法如下：

一、perl 多进程编程

#!/usr/bin/perl
use strict;
use warnings;
my $Max_pro =10;
for (my $i = 1; $i < $Ma{x}_{p}ro;++$i){
my KaTeX parse error: Expected 'EOF', got '#' at position 52: … #̲创建进程 if…child_pro)){
die "launching child KaTeX parse error: Undefined control sequence: \n at position 10: child_pro\̲n̲"; …child_pro == 0 ){
do_child($i,$KaTeX parse error: Expected 'EOF', got '}' at position 36: …0; }̲ …i,$id) = @_;
print “CHILD process $i ===>>> $id\n”;
}

二、perl 多线程

模块中的方法：threads->create(), 创建一个新线程；
threads->join（），收割已经创建的线程；
threads->detach（），剥离创建的线程；
threads->list(),返回所有已经创建的线程；
threads->is_joinable(),返回目标线程是否已经完成，等待join；
t h r − > e q u q