日志

　　 #!/bin/perl
useEncode;
open(NOTESFILES,$ARGV[0]);
my%errorMeganotes;
print ">>>>>>>>>>>>>>",$ARGV[0],"<<<<<<<<<<n";
while(<NOTESFILES>){
　if($_=~/^(d{4}-d{2}-d{2}sd{2}:d{2}:d{2})s+ERRORs+(.*)s/g){
　　if($errorMeganotes{$2}){
　　　push@{$errorMeganotes{$2}},$1;
　　}else{
　　　$errorMeganotes{$2}=[$1];
　　}
　}
}
for(keys%errorMeganotes){
　my$tmp_keys=$_;
　my@tmp_array=@{$errorMeganotes{$tmp_keys}};
　print"errornumber:>>",scalar(@tmp_array),"<<n",encode("GBK",decode("UTF-8",$tmp_keys)),"n",join(",t",@tmp_array),"nnn";
}

　　sh

　　 #!/bin/sh
nowDate=$(date-d'-1day'+%Y-%m-%d);
echo$nowDate
perl/data/apps/shell/meganotesErrorLog.pl/data/apps/meganotes/tomcat/logs/app/app.log.$nowDate>　_tmp_$nowDate;
perl/data/apps/shell/meganotesErrorLog.pl/data/apps/schedule/tomcat/logs/app/app.log.$nowDate　>>_tmp_$nowDate;
mail-s$nowDate-ERROR-log　my@mail.com　<　_tmp_$nowDate;
rm_tmp_$nowDate;

　　结果：

　　>>>>>>>/data/apps/meganotes/tomcat/logs/app/app.log.2009-02-18<<<<<<<<<

　　error number :>>2<<

　　MusicActionOpLogProxy:142 - music.popularTime=[Invalid field value for field "music.popularTime".]

　　2009-02-18 15:53:54,　 2009-02-18 16:00:12

　　。。。。。。