Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/linux/24.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Can';t今天解析日志Linux文件_Linux_Perl_Parsing_Logging_Time - Fatal编程技术网

Can';t今天解析日志Linux文件

Can';t今天解析日志Linux文件,linux,perl,parsing,logging,time,Linux,Perl,Parsing,Logging,Time,我想监控我的linux日志,并从日志中提取信息,以处理我在公司从事的工作人员的活动所产生的文件 #!/bin/bash #if [[ -z "$1" ]]; then # echo "Error: usage: autoParseMD5EncZip [device_id]" #else yearCalc=`perl -e 'use Date::Calc qw(Today Add_Delta_Days); my ($y)=Add_Delta_Days(Today(),

我想监控我的linux日志,并从日志中提取信息,以处理我在公司从事的工作人员的活动所产生的文件

#!/bin/bash

#if [[ -z "$1" ]]; then
#       echo "Error: usage: autoParseMD5EncZip [device_id]"
#else
        yearCalc=`perl -e 'use Date::Calc qw(Today Add_Delta_Days); my ($y)=Add_Delta_Days(Today(), -1); print "$y"'`
        monthCalc=`perl -e 'use Date::Calc qw(Today Add_Delta_Days); my ($y,$m)=Add_Delta_Days(Today(), -1); if ($m<=9) {$m = "0".$m;} print "$m"'`
        prefixCalc=`perl -e 'use Date::Calc qw(Today Add_Delta_Days); my ($y, $m, $d)=Add_Delta_Days(Today(), -1); if ($m<=9) {$m = "0".$m;} if ($d<=9) {$d = "0".$d;} print "$y$m$d"'`
        secaudit=`perl -e 'use Date::Calc qw(Today Add_Delta_Days); my ($y, $m, $d)=Add_Delta_Days(Today(), -1); if ($m<=9) {$m = "0".$m;} if ($d<=9) {$d = "0".$d;} print "$d-$m-$y"'`

        pathSource="/syslog"
        pathDest="/syslog3/secaudit"

        #echo "ls -als /syslog/$yearCalc/$monthCalc/$prefixCalc-$1.gz"i
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] Parsing gw1 ..."
        logParser.app $pathSource/$yearCalc/$monthCalc/$prefixCalc-gw1 $pathDest/IDMOB-$secaudit.csv
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] Parsing gw2 ..."
        logParser.app $pathSource/$yearCalc/$monthCalc/$prefixCalc-gw2 $pathDest/IDMOB-$secaudit.csv
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] Encrypt gpg"
        gpg --batch -e -r IndoMobile --keyring /root/.gnupg/pubring.gpg -o $pathDest/IDMOB-$secaudit.csv.gpg $pathDest/IDMOB-$secaudit.csv
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        #rm -f $pathDest/IDMOB-$secaudit.csv
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] bzip-ing ..."
        bzip2 $pathDest/IDMOB-$secaudit.csv.gpg
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] md5sum-ing ..."
        md5sum $pathDest/IDMOB-$secaudit.csv.gpg.bz2 > $pathDest/IDMOB-$secaudit.md5
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] gzip-ing gw1 ..."
        gzip /syslog/$yearCalc/$monthCalc/$prefixCalc-gw1
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] gzip-ing gw2 ..."
        gzip /syslog/$yearCalc/$monthCalc/$prefixCalc-gw2
        nowTgl=$(date +%d/%m/%Y\ %H:%M:%S)
        echo "[$nowTgl] FINISH"
        echo " "
        echo "----------------------------------"
        echo " "
        echo " "
#fi
#/bin/bash
#如果[-z“$1”];然后
#echo“错误:用法:autoParseMD5EncZip[设备id]”
#否则
yearCalc=`perl-e'使用日期::calcqw(今天添加增量天数);my($y)=添加增量天数(今天(),-1);打印“$y”`

monthCalc=`perl-e'使用日期::Calc qw(今天添加增量天数);my($y,$m)=添加增量天数(今天(),-1);如果($m您的Perl脚本都有
Add_Delta_Days(Today(),-1)
,它取今天的日期,减去一天,结果是昨天。如果您想使用今天的日期,您可以将其更改为
Today()
,谢谢,我尝试更改脚本。