帮忙看看为什么代码中不执行print

hejianbu437

下面的代码我用来监控process.pl这个代码的执行情况，如果process.pl异常退出了，下面的代码就重新把它执行。
可以达到预期的效果。
但是有颜色部分的两句代码一直不会执行，为什么？

1. 
   
2. #!/usr/bin/perl
   
3. $a=0;
   
4. while($a<1){
   
5. $a=`ps -ef| grep process.pl| grep -v grep`;
   
6. while ($a eq ""){
   
7. print "aaaaaaaa\n";
   
8. `perl process.pl`;
   
9. $a=`ps -ef| grep process.pl| grep -v grep`;
   
10. sleep 5;
    
11. [color=Orange]print "cccccccccc\n";[/color]}
    
12. [color=Yellow]print "bbb\n";[/color]sleep 5;
    
13. }

复制代码

lockeyou

语法错误吧,应该把while改成if或者switch

pitonas

为什麽不缩进代码{:2_171:}

q1208c

回复 1# hejianbu437

这段代码会执行的, 当你 kill 掉 process.pl 的时候.