Can';t今天解析日志Linux文件
我想监控我的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(),
#!/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()
,谢谢,我尝试更改脚本。