如果文件1和文件2的第1列相同，则输出第2列字符串大的那1行

wh7211

回复 4# weichanghe2000

1. awk 'FILENAME==ARGV[1]{a[$1]=$2;next}{c=split(a[$1],b,"[._-]");split($2,d,"[._-]");for(e=1;e<=c;e++){match(b[e],"^([0-9]*)([a-zA-Z]*)([0-9]*)$",f);match(d[e],"^([0-9]*)([a-zA-Z]*)([0-9]*)$",g);for(h=1;h<=3;h++){if(f[h]>g[h]){i[$1]=$1" "a[$1];j=1;break}else if(f[h]<g[h]){i[$1]=$1" "$2;j=1;break}};if(j){j=0;break}}}END{l=asorti(i,k);for(m=1;m<=l;m++){print i[k[m]]}}' 1 2
   
2. Art 6.1.5-c.2
   
3. Fle 11.5.6
   
4. IO 1.b12_d
   
5. PK 0.2-53
   
6. STD F4
   
7. Uni 18b-16

复制代码

wh7211

回复 7# weichanghe2000

1. awk 'FILENAME==ARGV[1]{a[$1]=$2;next}{c=split(a[$1],b,"[._-]");split($2,d,"[._-]");for(e=1;e<=c;e++){match(b[e],"^([0-9]*)([a-zA-Z]*)([0-9]*)$",f);match(d[e],"^([0-9]*)([a-zA-Z]*)([0-9]*)$",g);for(h=1;h<=3;h++){f[h]=f[h]~"[0-9]"?f[h]+0:f[h];g[h]=g[h]~"[0-9]"?g[h]+0:g[h];if(f[h]>g[h]){i[$1]=$1" "a[$1];j=1;break}else if(f[h]<g[h]){i[$1]=$1" "$2;j=1;break}};if(j){j=0;break}}}END{l=asorti(i,k);for(m=1;m<=l;m++){print i[k[m]]}}' 1 2

复制代码

wh7211

回复 8# 1cpuer


f和g是数组，用于数字或字符串比较。处理文件2时：

<<<处理a[$1]，即『IO 1.b5_a』
e==1 -> b[e]==b[1]=="1" -> f[1]=="1",f[2]=="",f[3]==""
e==2 -> b[e]==b[2]=="b5" -> f[1]=="",f[2]=="b",f[3]=="5"
e==3 -> b[e]==b[3]=="a" -> f[1]=="",f[2]=="a",f[3]==""

<<<处理$2，即『IO 1.b12_d』
e==1 -> d[e]==d[1]=="1" -> g[1]=="1",g[2]=="",g[3]==""
e==2 -> d[e]==d[2]=="b12" -> g[1]=="",g[2]=="b",g[3]=="12"
e==3 -> d[e]==d[3]=="d" -> g[1]=="",g[2]=="d",g[3]==""

wh7211

回复 13# weichanghe2000

f[h]=f[h]~"[0-9]"?f[h]+0:f[h];g[h]=g[h]~"[0-9]"?g[h]+0:g[h]

这段代码等同于『if(f[h]~"[0-9]"){f[h]=f[h]+0};if(g[h]~"[0-9]"){g[h]=g[h]+0}』，如果f[h]和g[h]的值是数字，就用『f[h]+0』把f[h]的值转换成数字后再比较

wh7211

回复 17# weichanghe2000

1. cat 1
   
2. PK      0.1-37
   
3. Art     16.1.4-b.0
   
4. Fle     9.13.2
   
5. Uni     18b-16
   
6. STD     8D15
   
7. IO      1.b5_a
   
8. IP      D2G
   
9. Art     6.1.5-e.0
   
10. Uni     8c-16
    
11. 
    
12. cat 2
    
13. IO      1.b12_e
    
14. Uni     8c-7
    
15. Art     16.1.5-c.2
    
16. PK      0.2-53
    
17. Fle     11.5.6
    
18. STD     8D4
    
19. IP      D2P
    
20. IO      1.b12_d
    
21. Art     6.1.2-c.2
    
22. 
    
23. awk '{split(a[$1],b,"[._-]");c=split($2,d,"[._-]");for(e=1;e<=c;e++){match(b[e],"^([0-9]*)([a-zA-Z]*)([0-9]*)([a-zA-Z]*)$",f);match(d[e],"^([0-9]*)([a-zA-Z]*)([0-9]*)([a-zA-Z]*)$",g);for(h=1;h<=4;h++){f[h]=f[h]~"[0-9]"?f[h]+0:f[h];g[h]=g[h]~"[0-9]"?g[h]+0:g[h];if(f[h]>g[h]){a[$1]=a[$1];i=1;break}else if(f[h]<g[h]){a[$1]=$2;i=1;break}};if(i){i=0;break}}}END{j=asorti(a,k);for(l=1;l<=j;l++){print k[l],a[k[l]]}}' 1 2
    
24. Art 16.1.5-c.2
    
25. Fle 11.5.6
    
26. IO 1.b12_e
    
27. IP D2P
    
28. PK 0.2-53
    
29. STD 8D15
    
30. Uni 18b-16

复制代码

wh7211

回复 17# weichanghe2000

wh7211

回复 17# weichanghe2000