Mojo 分析日志接口

最新推荐文章于 2024-08-01 21:54:26 发布

scan724

最新推荐文章于 2024-08-01 21:54:26 发布

阅读量518

点赞数

分类专栏： mojo

本文链接：https://blog.csdn.net/zhaoyangjian724/article/details/51699673

版权

mojo 专栏收录该内容

19 篇文章 30 订阅 ¥39.90 ¥99.00

订阅专栏

这是一个使用Perl编写的脚本，用于分析指定的日志文件，并找出包含特定错误关键字（如'Exception'和'Err'）的行。脚本首先清空临时文件，然后读取日志文件计算行数，比较上一次记录的行数，找出增量记录。如果找到错误关键字但不包含特定字符串'HandleProxyTradeGroup'，则将相关行追加到临时文件，并保存到数据库中。

摘要由CSDN通过智能技术生成

#!/usr/bin/perl
#取文件行数
##循环开始清空文件
use POSIX;
use DBI;
my $dir  = '/data01/applog_backup';
my $file = "$ARGV[0]";
my $SDATE = strftime("%Y-%m-%d",localtime());
my $XDATE = strftime("%Y%m%d%H%M%S",localtime());
my $mon_file = "$dir/$file";
my $USER="$ARGV[1]";
my $IP="$ARGV[2]";
my $ENV="$ARGV[3]";

my $dbUser='DEVOPS';
my $user="root";
my $passwd="1234567";
my $dbh  = DBI->connect("dbi:mysql:database=$dbUser;host=192.168.32.161;port=3306",$user,$passwd) or die "can't connect to database ". DBI-errstr;
$dbh->do("SET NAMES utf8");   
open FILE,">tmp.out";
close FILE;
ope

了解本专栏