免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1266 | 回复: 2
打印 上一主题 下一主题

如何用PERL编写自动调用系统(请教,请教)!!! [复制链接]

shadowcoco 该用户已被删除
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2004-10-25 13:30 |只看该作者 |倒序浏览
提示: 作者被禁止或删除 内容自动屏蔽

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
2 [报告]
发表于 2004-10-25 18:48 |只看该作者

如何用PERL编写自动调用系统(请教,请教)!!!

首先,找到相应的能够获得这些你需要的信息的命令,
然后用肉眼观察他们的输出,
并参考 man 手册,
得知哪个信息是在哪个位置。

完成这些准备工作之后,
就可以用 perl 把这些步骤粘合在一起,
做成脚本。

最后再配置一下 crontab ,让你的脚本自动运行,就可以了。




另外,以后请不要重复发贴。

论坛徽章:
0
3 [报告]
发表于 2004-11-25 23:28 |只看该作者

如何用PERL编写自动调用系统(请教,请教)!!!

use Proc:roccessTable;

#the example code as below:

$FORMAT = "%-6s %-10s %-8s %-24s %s\n";
$t = new Proc:rocessTable;
printf($FORMAT, "ID", "TTY", "STAT", "START", "COMMAND";
foreach $p ( @{$t->;table} ){
   printf($FORMAT,
          $p->;pid,
          $p->;ttydev,
          $p->;state,
          scalar(localtime($p->;start)),
          $p->;cmndline);
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP