![](https://img-blog.csdnimg.cn/20201014180756724.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
perl
tower888
爱好看书,音乐,计算机
http://hi.baidu.com/tower888
展开
-
使用perl统计日志中单位时间内的请求数
$file="g:/log/x.log";%map=();open(IN,"<$file") || die "Couldn't open $filename for reading: $!";$num=0;$v=0;$str="";while($line=){ if (!($line=~m/.*logid.*phonenumber.*message.*/)) {#不匹配就继续循环原创 2013-12-13 15:51:16 · 1134 阅读 · 0 评论 -
通过perl统计日志中请求/响应,获取单个用户成功/失败的操作次数。
通过perl统计日志中请求/响应,获取单个用户成功/失败的操作次数。use Encode;#$WORK_HOME="G:/Cache/120876992/study_perl";$WORK_HOME="/lc/log";#$inFile="$WORK_HOME/yndx-log.log";$inFile=;$outFile="$WORK_HOME/out.tmp";$outTjRes原创 2014-01-14 23:04:35 · 1318 阅读 · 0 评论 -
sublime text执行perl程序
http://hi.baidu.com/fwwlhcjfphdgwxr/item/3d76dc2778637af851fd8763转载 2014-01-18 21:26:02 · 4029 阅读 · 1 评论