本帖最后由 WHY 于 2022-12-1 13:37 编辑
图片看不清- $arr = @'
- aaa A=
- A 中国 河北
- aaa Av=
- 河北人
-
- aaa B=
- B 中国 北京
- aaa Bv=
- 北京人
-
- aaa C=
- C 美国 纽约
- aaa Cv=
- 纽约人
-
- aaa D=
- D 日本 东京
- aaa Cv=
- 东京人
-
- aaa E=
- E 日本 大阪
- aaa Dv=
- 大阪人
-
- aaa F=
- F 韩国 首尔
- aaa Dv=
- 首尔人
-
- 我是后面的文本, 我是不能被修改的
- '@ -split '\r?\n';
-
- $char = [char[]](65..90);
- $hash = @{};
- $n = 0;
-
- for( $i = 0; $i -lt $arr.Count; $i++ ){
- $m = [regex]::Match( $arr[$i], '^ [A-Z] (\S+)(.*)$' );
- if( $m.Success ){
- $key = $m.Groups[1].Value;
- if( !$hash.ContainsKey($key) ){
- $hash[$key] = $char[$n++];
- }
- $arr[$i] = ' ' + $hash[$key] + ' ' + $key + $m.Groups[2].Value;
- }
- }
- $arr
复制代码
|