Return to kill.pl CVS log

Up to [parser3project] / parser3 / src / targets / isapi

Annotation of parser3/src/targets/isapi/kill.pl, revision 1.1

1.1     ! paf         1: $|=1;
        !             2: print $info=`PSTAT.EXE |grep inetinfo`;
        !             3: #0:00:08.231   0:00:07.250  1988    11427    8744  8  482  15 162 inetinfo.exe pid: a2 pri: 8 Hnd:  482 Pf:  11427 Ws:   1988K inetinfo.exe
        !             4: ($pid)=$info=~/(\d+)\s+inetinfo/i;
        !             5: print $pid?`kill $pid`:"inetinfo not running\n";
        !             6: $secs=1;
        !             7: print "sleeping $secs secs... ";
        !             8: sleep $secs;
        !             9: print "done\n";