PowerShell将重复国家名字前的字母重新排序

meixi

大家好!

图片中左侧是要处理的文本, 右侧是处理后的效果! 不同的颜色仅起到区分作用


要处理的文本中, 同一个国家前的字母不相同, 处理后要改成相同的,例如
中国河北 的前面是A
中国北京 的前面是B
处理后全改为A

按相同的逻辑,把后面国家名前的字母, 也按A-Z的顺序重新修改
----------------------------------------------------------------------------------------------------
国家名怎么定位?

1.国家名所在的行之前和之后,有如下规律,其中X是一个大写字母,其它都是固定的
aaa X=
A 中国 河北
aaa Xv=

2.国家名的字数不固定, 但其相对位置是固定的
其所在的行前肯定有一个空格
空格后就是要修改的大写字母
大写字母后有一个空格
空格后是国家名,国家名的文字是连续的
国家名后有一个空格
空格后的文本是任意字符

1. $s = @'
   
2. aaa A=
   
3. A 中国 河北
   
4. aaa Av=
   
5. 河北人
   
6. 
   
7. aaa B=
   
8. B 中国 北京
   
9. aaa Bv=
   
10. 北京人
    
11. 
    
12. aaa C=
    
13. C 美国 纽约
    
14. aaa Cv=
    
15. 纽约人
    
16. 
    
17. aaa D=
    
18. D 日本 东京
    
19. aaa Cv=
    
20. 东京人
    
21. 
    
22. aaa E=
    
23. E 日本 大阪
    
24. aaa Dv=
    
25. 大阪人
    
26. 
    
27. aaa F=
    
28. F 韩国 首尔
    
29. aaa Dv=
    
30. 首尔人
    
31. 
    
32. 我是后面的文本, 我是不能被修改的
    
33. '@
    
34. 
    
35. #Todo 处理代码
    
36. 
    
37. 
    
38. <# 处理后的效果
    
39. aaa A=
    
40. A 中国 河北
    
41. aaa Av=
    
42. 河北人
    
43. 
    
44. aaa B=
    
45. A 中国 北京
    
46. aaa Bv=
    
47. 北京人
    
48. 
    
49. aaa C=
    
50. B 美国 纽约
    
51. aaa Cv=
    
52. 纽约人
    
53. 
    
54. aaa D=
    
55. C 日本 东京
    
56. aaa Cv=
    
57. 东京人
    
58. 
    
59. aaa E=
    
60. C 日本 大阪
    
61. aaa Dv=
    
62. 大阪人
    
63. 
    
64. aaa F=
    
65. D 韩国 首尔
    
66. aaa Dv=
    
67. 首尔人
    
68. 
    
69. 我是后面的文本, 我是不能被修改的
    
70. #>

复制代码

WHY

图片看不清

1. $arr = @'
   
2. aaa A=
   
3. A 中国 河北
   
4. aaa Av=
   
5. 河北人
   
6. 
   
7. aaa B=
   
8. B 中国 北京
   
9. aaa Bv=
   
10. 北京人
    
11. 
    
12. aaa C=
    
13. C 美国 纽约
    
14. aaa Cv=
    
15. 纽约人
    
16. 
    
17. aaa D=
    
18. D 日本 东京
    
19. aaa Cv=
    
20. 东京人
    
21. 
    
22. aaa E=
    
23. E 日本 大阪
    
24. aaa Dv=
    
25. 大阪人
    
26. 
    
27. aaa F=
    
28. F 韩国 首尔
    
29. aaa Dv=
    
30. 首尔人
    
31. 
    
32. 我是后面的文本, 我是不能被修改的
    
33. '@ -split '\r?\n';
    
34. 
    
35. $char = [char[]](65..90);
    
36. $hash = @{};
    
37. $n = 0;
    
38. 
    
39. for( $i = 0; $i -lt $arr.Count; $i++ ){
    
40.     $m = [regex]::Match( $arr[$i], '^ [A-Z] (\S+)(.*)$' );
    
41.     if( $m.Success ){
    
42.         $key = $m.Groups[1].Value;
    
43.         if( !$hash.ContainsKey($key) ){
    
44.             $hash[$key] = $char[$n++];
    
45.         }
    
46.         $arr[$i] = ' ' + $hash[$key] + ' ' + $key + $m.Groups[2].Value;
    
47.     }
    
48. }
    
49. $arr

复制代码