A.pl如何kill掉所有B脚本产生的进程

609854

脚本A.pl 调用脚本B.sh ，B.sh会产生多个进程，当B.sh执行时间太久或HUNG住的时候，怎么在A.pl 中Kill掉所有B.sh所产生的进程，也kill掉B.sh。

安夏0沫悲伤

帮顶下。。         

stanley_tam

感觉alarm是你要的{:3_195:}

1. eval {
   
2.     local $SIG{ALRM} = sub { die "alarm\n" }; # NB: \n required
   
3.     alarm $timeout;
   
4.     `B.sh`;
   
5.     alarm 0;
   
6. };
   
7. if ($@) {
   
8.     die unless $@ eq "alarm\n";   # propagate unexpected errors
   
9.     # timed out
   
10. }
    
11. else {
    
12.     # didn't
    
13. }

复制代码

fkiori

用ps 和 grep 获得进程ID
在程序中用反引号捕获结果。
然后system杀掉