[仙子创造]用Perl写一套服务监控系统

兰花仙子

各位对Perl在系统管理中的应用有所疑惑的朋友，可看看偶写的这个监控系统。
目前已在偶们广州公司应用，监控100多台RH Linux Servers。
代码偶业余写的，只花了1天半时间，不足在所难免，大家仅供参考吧。

79hy

3ks,发现仙子同学还是很牛掰的～

charmesp

强,多学习多学习..
哪有更多的例子 去学习

福瑞哈哥

看了pdf，代码没仔细看，排版挺好的，是用latex还是什么？

兰花仙子

原帖由 福瑞哈哥 于 2007-1-12 16:41 发表
看了pdf，代码没仔细看，排版挺好的，是用latex还是什么？

就是word了。

79hy

RT：我找了好久没找到，每次都是参考别人的程序用一个参数，有系统介绍的资料最好了。谢谢～～

兰花仙子

原帖由 79hy 于 2007-1-12 17:06 发表
RT：我找了好久没找到，每次都是参考别人的程序用一个参数，有系统介绍的资料最好了。谢谢～～

perldoc POSIX

79hy

中文手册。呵呵。看起来快。呵呵。如果有，谢谢共享啦～～

|

1. 
   
2. 看了一下还不错
   
3. 两点建议
   
4. 命令你可以这么写
   
5. %cmd=(
   
6.             cmd1=>sub{},
   
7.             .....................
   
8.             );
   
9. die "error"  unless defined  $cmd{lc $key};
   
10. @warn=@{[$cmd{lc $key}()]} and push @warnings,"error @{[@warn]}";
    
11. 
    
12. 同一个文件避免多次stat调用用 _
    

复制代码

flyhu

不错，很好，给我很大的参考意义。

我目前也在做一个监控系统，刚刚基础perl，已经感受到了一些perl的优点。

我的监控系统的结构是这样的：任务调度模块+采集代理模块＋资料库＋web展现门户

我的采集代理模块，只完成数据采集，不含分析，分析工作有任务调度模块里面调用的java类来做。

我的采集代理模块，没用使用socket，是使用lighttpd+perl写的cgi程序。。