- 论坛徽章:
- 25
|
本帖最后由 wh7211 于 2018-05-05 17:21 编辑
回复 17# weichanghe2000
- cat 1
- PK 0.1-37
- Art 16.1.4-b.0
- Fle 9.13.2
- Uni 18b-16
- STD 8D15
- IO 1.b5_a
- IP D2G
- Art 6.1.5-e.0
- Uni 8c-16
- cat 2
- IO 1.b12_e
- Uni 8c-7
- Art 16.1.5-c.2
- PK 0.2-53
- Fle 11.5.6
- STD 8D4
- IP D2P
- IO 1.b12_d
- Art 6.1.2-c.2
- 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
- Art 16.1.5-c.2
- Fle 11.5.6
- IO 1.b12_e
- IP D2P
- PK 0.2-53
- STD 8D15
- Uni 18b-16
复制代码 |
|