51CTO博客开发GOOLE翻译王乾De技术Blog[爱生活,爱学习]mcshell blog
最近一直在看dancer,发现真心好用,之前在看mojo,搞了好久没有搞懂.只能怪自己太挫了.作为练手就写了一套简易的监控系统,主要是利用net::ssh2模块监控AIX服务器的CPU,IO负载,还有磁盘空间.当然如果你是linux/unix作为监控服务器简易使用net::ssh:perl 或者使用SNMP来获取服务器信息.在lib下添加login.pmpackage&
本文记录了整个stream的配置过程,请根据环境的不同修改schema,以及相关路径.–1)设定初始化参数–在线、备份数据库分别执行如下的语句:sqlplus '/ as sysdba' alter system set aq_tm_processes=4 scope=both; alter system set global_names=true scope=both; alter system
上篇已经讲过client端的CODE这部分code主要用来接收client端发送来的日志,从数据库中读取reglar然后去匹配.如果出现匹配则判断为XSS攻击.server端的SOCKET接收用了coro相关的模块.配置文件仿照前一篇博客读取即可.#!/usr/bin/perl use warnings; use strict; use AnyEvent; use AnyEvent::DBI::M
此脚本为client端的code,主要实现读取日志中的一些关键词进行过滤,以下介绍几个模块的用途:File::Tail 用于读取日志,功能类似于linux中tail ,只读取最新的日志AnyEvent 处理异步事件AnyEvent::Socket 建立socket连接AnyEvent::Handle 处理Socket中的句柄Config::Tiny
介绍:Bugzilla是Mozilla公司提供的一款开源的免费Bug(错误或是缺陷)追踪 系统,用来帮助你管理软件开发,建立完善的BUG跟踪体系。 环境: Centos + apache apache的安装就不说了。 下面进入正题: wget http://ftp.mozilla.org/pub/mozilla.org/webtools/bugzilla-4.2.5.t
Text as follows: (1+2(123+(888)3)ddf)wwww(sdf(sdfdsf)gggg) Match: 1+2 123+ 888 3 ddf sdf sdfdsf gggg #!/usr/bin/perl use strict; use warnings; u
有这么一道题。。 aaa bbb #if defined(__MMI_DEL__) ccc #endif ddd eee #if defined(__MMI_DEL__) fff &nb
程序允许30分钟,期间要求用户输入来模拟车辆进入、出去的行为 输入的内容为一串字符串,每个不同的字符串代表一辆车. 纪录所有车每次进出的时间,计算时间、次数和价格. 价格依照价格表,阶梯定价:头10分钟5元,超过10分钟的每分钟5元 程序运行30分钟自动退出,程序退出前还没出库的车,收费200元 程序最后统计所有车辆的情况:次数,每次时间,总时间,总价 code: #
需要处理的excel的格式如下 转换器代码如下(防止中文乱码)(作者为:flw): package MyExcelFormatter; use strict; use warnings; use base qw(Spreadsheet::ParseExcel::Fmt
这个问题是cu上有人提出的,感觉具有代表性,特地记录一下 比如a 文件 内容如下 a=11 b=http://www.baidu.com/baicd c=xxx/baidu.apk a=12 b=http://www.sina.com/xxx c=xxx/sina.apk a=13&n
很多时候在做测试的人员需要去测试开发人员的新项目,传统的操作是打开浏览器点击各个地方看操作是否流畅,是否会报BUG。每天都会重复的操作,我想不管是谁都不喜欢做这些重复的事情吧。这时候如果有一个软件能够自动化完成重复性的操作,节约了大量的人力物力。这次就来说说关于selenium的那些事,第一次直接把效果展现给大家,这样就会有学习的兴趣。 一、下载所需要的软件 这里说一下,我所在的平台是win。
一直很想了解nagios中的pnp是如何工作的,正好看到这几天cu上有人问rrdtool如何图像。这几天特地的翻了翻rrd的资料,补习了下。结合perl的一些模块,获取所需要的数据,最后调用rrdtools绘制图像。好了,废话不多说了,开始讲解实现过程。 一、 所需软件以及安装方法 1.安装rrdtool (这里不多说了,网上文章太多了)
自定义的子网范围如下: 192.168.0.0/16 219.111.192.0/18 68.132.0.0/17 61.135.0.0/16 192.162.0.0/16 152.172.0.0/16 34.132.0.0/14 97.208.0.0/13 有以下几个IP:192.168.1.5 219.111.193.1 219.111.1.2,要求计算
作为运维来监控文件的状态可以扩展很多个方面,例如rsync增量备份,监控服务器是否被黑客入侵等等。所以说监控文件的状态至关重要。根据这几天的工作的需求特别写了一个Perl脚本,有什么方面没有考虑到的希望大家多多指出。 需要安装的模块: File::Monitor File::Find::Rule 安装方法: win下(需要有perl环境,我这里装的是activeperl) cmd下进入
Copyright © 2005-2025 51CTO.COM 版权所有 京ICP证060544号