遍历文件,寻找错误信息
来源:互联网 发布:win读取mac硬盘软件 编辑:程序博客网 时间:2024/05/02 00:45
目的:对当前目录或指定目录下以.log为后缀的文件进行解析,找出符合匹配格式的错误信息的位置。
说明:仅仅是当前目录或指定目录下的文件!暂未实现,遍历目录。
代码:(文件名:xxx.pl)
use strict;
my ($eachfile,$line,$output);
$eachfile;
$line = 0;
$output = ">result.txt";
open OUT,$output or die $!;
my @myfiles = <*.log>;
for $eachfile (@myfiles) {
open FH,$eachfile or die $!;
$line = 0;
#print "\n$eachfile -> start \n";
while(<FH>) {
$line++;
#print $_,"\n";
if(($_ =~ /warnings*,\s([0-9]*)\serrors,\s([0-9]*)\sserious errors/))
{
#print $1,"\n";
if($1 > 0 || $2 > 0)
{
print "result in the file: $eachfile line: $line \n";
print OUT "result in the file: $eachfile line: $line \n";
}
}
}
#print "\n$eachfile -> end \n";
close FH;
}
print "finish search ! \n";
print OUT "finish search ! \n";
close OUT;
my ($eachfile,$line,$output);
$eachfile;
$line = 0;
$output = ">result.txt";
open OUT,$output or die $!;
my @myfiles = <*.log>;
for $eachfile (@myfiles) {
open FH,$eachfile or die $!;
$line = 0;
#print "\n$eachfile -> start \n";
while(<FH>) {
$line++;
#print $_,"\n";
if(($_ =~ /warnings*,\s([0-9]*)\serrors,\s([0-9]*)\sserious errors/))
{
#print $1,"\n";
if($1 > 0 || $2 > 0)
{
print "result in the file: $eachfile line: $line \n";
print OUT "result in the file: $eachfile line: $line \n";
}
}
}
#print "\n$eachfile -> end \n";
close FH;
}
print "finish search ! \n";
print OUT "finish search ! \n";
close OUT;
0
上一篇:MTK 09B 新特性学习
下一篇:Android学习网站,资料推荐,学习经验共享
相关热门文章
- A sample .exrc file for vi e...
- 游标的特征
- IBM System p5 服务器 HACMP ...
- busybox的httpd使用CGI脚本(Bu...
- Solaris PowerTOP 1.0 发布
- linux dhcp peizhi roc
- 关于Unix文件的软链接
- 求教这个命令什么意思,我是新...
- sed -e "/grep/d" 是什么意思...
- 谁能够帮我解决LINUX 2.6 10...
给主人留下些什么吧!~~
评论热议
0 0
- 遍历文件,寻找错误信息
- python 寻找遍历指定文件
- 递归遍历文件目录寻找文件
- 遍历SD卡寻找自己想要的文件
- c#遍历寻找节点
- 寻找文件
- 查找linux文件错误信息
- 文件上传错误信息说明
- Java遍历列出某一目录下的文件及文件夹,寻找某一指定文件
- java中递归遍历寻找一个文件,并找出的它的全路径
- Perl中递归遍历文件夹,寻找包含某个字符串的文件
- python学习笔记:实现一个遍历文件寻找字符串的功能
- 遍历数据库寻找目标字符串
- bat语句寻找遍历文件夹
- struts2文件上传时错误信息
- strut2 自定义文件上传错误信息
- Hibernate 映射文件配置错误信息
- C# 寻找文件(FindNextFile)
- Linux驱动开发必看详解神秘内核(完全转载)
- LeetCode : Add Two Numbers [java]
- 把数组排成最小的数
- MTK TAB页面的实现
- MTK 09B 新特性学习
- 遍历文件,寻找错误信息
- Android学习网站,资料推荐,学习经验共享
- 生成修改记录
- 内核学习入门
- MTK 10A 新特性学习
- div在各种情况下的居中
- 记住:你应该努力去追求幸福
- 电池电量显示 MTK 09B
- Ubuntu下Android应用程序开发环境搭建
原创粉丝点击
热门IT博客
热门问题
老师的惩罚
人脸识别
我在镇武司摸鱼那些年
重生之率土为王
我在大康的咸鱼生活
盘龙之生命进化
天生仙种
凡人之先天五行
春回大明朝
姑娘不必设防,我是瞎子
济南西部会展中心
厦门会展中心
2019年琶洲会展时间排期表
琶洲会展2019时间表
珠海国际会展中心
济南国际会展中心
合肥滨湖会展中心近期活动
厦门国际会展中心
会展策划与管理
2019年梅江会展日期表
会展经济与管理
上海国际会展中心2019时间表
上海会展中心
2019年青岛会展一览表
郑州会展中心展会排期
琶洲会展时间表
湖南国际会展中心
正定国际会展中心
昆明国际会展中心
香港会展中心
深圳会展中心排期
成都会展中心
合肥滨湖会展中心2019近期活动
厦门会展中心2019近期展销
会展经济管理
会议会展服务
会展展示设计
会展活动策划
大型会展活动
琶洲会展中心
会展公司排名
会展设计公司
家具会展中心
会展营销策划
悦来国际会展中心
会展管理专业
白云国际会展中心
海峡国际会展中心
会展艺术设计
虹桥会展中心
西部会展中心