博客
关于我
使用perl统计日志中单位时间内的请求数
阅读量:732 次
发布时间:2019-03-21

本文共 268 字,大约阅读时间需要 1 分钟。

文件路径为“g:/log/x.log”;要以只读方式打开该文件进行处理,如果打开失败则输出相应错误信息。初始化读取变量 $num 和 $v,以及空字符串 $str。循环读取输入文件中的每一行内容。若当前行内容匹配正则表达式 /.*logid.*phonenumber.*message./,则说明符合条件。对匹配到的内容进行截断处理,取前20个字符作为键。检查键存在于字典 $map 中:- 如果存在,增加计数值。- 如果不存在,创建新键,并设置初始计数值。遍历字典 $map 中的所有键值对,统计出现次数超过40的情况,输出相应结果。

转载地址:http://ztbgz.baihongyu.com/

你可能感兴趣的文章
Vue踩坑笔记 - 关于vue静态资源引入的问题
查看>>
Netty工作笔记0024---SelectionKey API
查看>>
Netty工作笔记0025---SocketChannel API
查看>>
Netty工作笔记0027---NIO 网络编程应用--群聊系统2--服务器编写2
查看>>
Netty工作笔记0028---NIO 网络编程应用--群聊系统3--客户端编写1
查看>>
Netty工作笔记0034---Netty架构设计--线程模型
查看>>
Netty工作笔记0050---Netty核心模块1
查看>>
Netty工作笔记0057---Netty群聊系统服务端
查看>>
Netty工作笔记0060---Tcp长连接和短连接_Http长连接和短连接_UDP长连接和短连接
查看>>
Netty工作笔记0063---WebSocket长连接开发2
查看>>
Netty工作笔记0070---Protobuf使用案例Codec使用
查看>>
Netty工作笔记0072---Protobuf内容小结
查看>>
Netty工作笔记0074---handler链调用机制实例1
查看>>
Netty工作笔记0077---handler链调用机制实例4
查看>>
Netty工作笔记0081---编解码器和处理器链梳理
查看>>
Netty工作笔记0083---通过自定义协议解决粘包拆包问题1
查看>>
Netty工作笔记0084---通过自定义协议解决粘包拆包问题2
查看>>
Netty工作笔记0085---TCP粘包拆包内容梳理
查看>>
Netty常用组件一
查看>>
Netty常见组件二
查看>>