看一下Proc :: ProcessTable模块,该模块返回有关系统中进程的大量信息.调用"fields"方法以获取可从每个进程中提取的详细信息列表.
我最近发现了上面的模块,它刚刚取代了我在为Linux编写Perl kill程序时编写的Process模块.您可以在这里查看我的脚本.
可以轻松扩展它以从ps命令中提取更多信息.例如.' getbycmd '方法返回一个pid列表,其命令行调用与传递的参数匹配.然后,您可以通过调用' getdetail '来检索特定进程的详细信息,方法是将PID传递给它,就像这样,
my $psTable = Process->new();
# Get list of process owned by 'root'
for my $pid ( $psTable->getbyuser("root") ) {
$psDetail = $psList->getdetail( $pid );
# Do something with the psDetail..
}
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
4616 次 |
| 最近记录: |