请教把文件中英文格式的时间字段替换成标准格式的时间字段，例如May 20 2014 10:29:41

stonejar

我有多个文件需要这样处理，但每个文件的分隔符数量不一样且时间字段位置不一样和一条记录可能会有多个时间字段怎么办呢？
文本中可能出现所有12个月的英文字串替换成数字月份，并且把后面的微秒去掉，并且如果是AM时直接去掉AM，为PM时时间加上12小时为24小时制。
类似要格式化文件中May 20 2014 10:29:41:076AM成2014-05-20 10:29:41,
文件中可能字段值会有回车换行，可能会有空行，但空行不能去掉，回车换行也不能去掉

谢谢！

例如file1:
ggg##Jan 20 2014 10:29:41:076PM##abc##中国
234sdf##Apr 25 2015 10:29:41:076AM##gcd##美国
dfgdfg
4747##Sep 29 2015 1:29:41:076AM##yyy##美国
经过替换后变成
ggg##2014-01-20 22:29:41##abc##中国
234sdf##2015-04-25 10:29:41##gcd##美国
dfgdfg
4747##2015-09-29 01:29:41##yyy##美国

file2:
1##5667##Jan 2 2013 10:29:41:076PM##rtyr##中国
2##ewrer##Apr 17 2016 10:29:41:076AM##rty##埃及

3##hjkhjk##Oct 9 2012 1:29:41:076AM##tyityu##伊朗

经过替换后：
1##5667##2013-01-02 22:29:41##rtyr##中国
2##ewrer##2016-04-17 10:29:41##rty##埃及

3##hjkhjk##2012-10-09 01:29:41##tyityu##伊朗

file3:
1##5667##Jan 2 2013 10:29:41:076PM##Jan 2 2013 10:29:41:076PM##rtyr##中国
2##ewrer##Apr 17 2016 10:29:41:076AM##Jan 2 2013 10:29:41:076PM##rty##埃及

3##hjkhjk##Oct 9 2012 1:29:41:076AM##Jan 2 2013 10:29:41:076PM##tyityu##伊朗
经过替换后：
1##5667##2013-01-02 22:29:41##2013-01-02 22:29:41##rtyr##中国
2##ewrer##2016-04-17 10:29:41##2013-01-02 22:29:41##rty##埃及

3##hjkhjk##2012-10-09 01:29:41##2013-01-02 22:29:41##tyityu##伊朗

感谢各位大神！！

haooooaaa

gawk 4

1. awk '
   
2. BEGIN{
   
3.     OFS=FS="##"
   
4.     a["PM"]=12
   
5. }
   
6. NF{
   
7.     patsplit($0,m,"... [0-9]{1,2} [0-9]{4} [0-9]{1,2}:[0-9]{1,2}:[0-9]{1,2}:[0-9]{3}..")
   
8.     for(i in m){
   
9.         split(m[i],t,"[ :]")
   
10.         sub(m[i],strftime("%F %T",mktime(t[3]" "(index("JanFebMarAprMayJunJulAugSepOctNovDec",t[1])+2)/3" "t[2]" "t[4]" "t[5]" "t[6])+a[substr(t[7],4)]*3600))
    
11.     }
    
12.     print
    
13. }
    
14. ' file

复制代码

stonejar

回复 2# haooooaaa


    高手您好，执行了报错信息：
awk: 命令行:13: (FILENAME=y FNR=1) 致命错误: 函数“patsplit”未定义

itfly3

sed -r 's/:[^:]*(.)M/ \1M/' file|while read line ;do time=`echo $line|grep -oP "[^#]+:[^#]+"`;if [[ $? -eq 0 ]];then i="`date -d "$time" +%F" "%T`";echo $line|sed "s/[^#]*:[^#]*/$i/"; else echo $line;fi;done

把file换成你的文件名即可。

itfly3

sed -r 's/:[^:]*(.)M/ \1M/' file|while read line ;do time=`echo $line|grep -oP "[^#]+:[^#]+"`;if [[ $? -eq 0 ]];then i="`date -d "$time" +%F" "%T`";echo $line|sed "s/[^#]*:[^#]*/$i/"; else echo $line;fi;done

把file换成你的文件名即可。

itfly3

1. sed -r 's/:[^:]*(.)M/ \1M/' [color=Red]file[/color]|while read line ;do time=`echo $line|grep -oP "[^#]+:[^#]+"`;if [[ $? -eq 0 ]];then i="`date -d "$time" +%F" "%T`";echo $line|sed "s/[^#]*:[^#]*/$i/"; else echo $line;fi;done

复制代码

把file换成你的文件名

itfly3

111111111111111111111111

itfly3

sed -r 's/:[^:]*(.)M/ \1M/' file|while read line ;do time=`echo $line|grep -oP "[^#]+:[^#]+"`;if [[ $? -eq 0 ]];then i="`date -d "$time" +%F" "%T`";echo $line|sed "s/[^#]*:[^#]*/$i/"; else echo $line;fi;done

把file换成你的文件名即可。

itfly3

sed -r 's/:[^:]*(.)M/ \1M/' file|while read line ;do time=`echo $line|grep -oP "[^#]+:[^#]+"`;if [[ $? -eq 0 ]];then i="`date -d "$time" +%F" "%T`";echo $line|sed "s/[^#]*:[^#]*/$i/"; else echo $line;fi;done

把file换成你的文件名即可。

itfly3

11111111111111111111111111111