perl学习之nagios脚本-创新互联
- #!/usr/bin/perl
- "/usr/lib64/nagios/plugins"
- 'h=s'
- "http://$HOSTADDRESS:8080/health.html"
- ''
- "sling is running now!\n"
- 'OK'
- else
- "sling is not running,health page not found!!\n"
- 'UNKNOWN'
根据查看的nagios官网,如果用perl写监控脚本,必须使用strict模块,定义的所有变量都必须使用my声明,Getopt::Long模块可以为perl脚本传参,lib是指定nagios里utils.pm的位置,引用utils模块,nagios自带的%ERRORS可以为我们返回状态code。
创新互联建站总部坐落于成都市区,致力网站建设服务有成都网站建设、网站设计、网络营销策划、网页设计、网站维护、公众号搭建、微信小程序开发、软件开发等为企业提供一整套的信息化建设解决方案。创造真正意义上的网站建设,为互联网品牌在互动行销领域创造价值而不懈努力!另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。
当前文章:perl学习之nagios脚本-创新互联
URL标题:http://myzitong.com/article/ipsps.html