Question

有N个perl脚本需要并发的执行完成，具体如何实现？求perl大神指教。

主程序：main_excu.pl中调用N个perl脚本，并发量为2.
N个perl脚本：a.pl、b.pl、c.pl、d.pl、e.pl、f.pl

Answer 1

use threads;
my %thr;

for ( 'a' .. 'f' ) {
    $thr{$_} = threads->create ( 
        sub { 
            eval { system ( "perl", "...../$_.pl" ) } ;
            print "$@$/" if $@;
        }
    );
}

sleep 3;
$thr{$_} -> join for ( 'a'..'f');

 其实不是很明白您後半段的意思.. 不过这个给您参考一下