perl开启并关闭w32进程
perl是个很强大的脚本语言，cpan包罗万象的库使其几乎无所不能，就比如进程控制这一块，java难以施展手脚。下面是一个windows下进程控制的的代码，启动一个进程并关闭它。
1、启动记事本，10秒后关闭它
$pid=open P,"| notepad" or die 'error';
print $pid;
sleep 10;
kill STOP,$pid;
close P;
2、启动ie浏览器，打开163主页，10秒后关闭浏览器
use Win32::Process;
use Win32;
Win32::Process::Create(
$ProcessObj,
"C:\\Program Files\\Internet Explorer\\iexplore.exe",
"iexplore http://www.163.com",
0,
NORMAL_PRIORITY_CLASS,
"."
) || die ErrorReport();
sleep 10;
$ProcessObj->Kill(0);# 或者kill STOP,$ProcessObj->GetProcessID();
注意：
1. 第一种方式是通用跨平台的，但并非无所不能， 比如第一种来打开ie ，firefox这些进程 ，就无法关闭它，其原因
获取的进程id不对，具体我也不知道怎么回事，另外linux下打开fireofx也是获取不到正确的pid
2.第二种只对windows系统有效，当进程是chrome时，无法关闭，chrome打开后演变成了多进程了，原来的进程似乎 已经消亡，结果就出现了无法关闭的现象。
页:
[1]