批处理之家 - Powered by Discuz! Board

标题: [文本处理] [已解决]批处理搜索重复行，第二、三、四...重复行尾分别添加(2)(3)(4)...以示区别 [打印本页]

作者: qixiaobin0715 时间: 2017-9-8 21:52 标题: [已解决]批处理搜索重复行，第二、三、四...重复行尾分别添加(2)(3)(4)...以示区别

如题文本文件如下

aa
bb
cc
aa
dd
bb
aa
ee
ff
...
复制代码

处理后

aa
bb
cc
aa （2）
dd
bb （2）
aa （3）
ee
ff
...
复制代码

作者: WHY 时间: 2017-9-9 23:54

gawk "!/^$/ {$0 = (a[$0]++ ? $0\"(\"a[$0]\")\" : $0)} 1" a.txt
复制代码

作者: WHY 时间: 2017-9-9 23:58

test.js

var map = [];
var fso = new ActiveXObject('Scripting.FileSystemObject');

var str = fso.OpenTextFile('a.txt').ReadAll().replace(
    /[^\r\n]+/g,
    function(s0){
        if (map[s0]){s0 += '(' + (++map[s0]) + ')'} else map[s0] = 1;
        return s0;
    }
)
fso.CreateTextFile('b.txt',2).Write(str)
复制代码

作者: qixiaobin0715 时间: 2017-9-11 06:18

谢谢WHY，完美解决。

欢迎光临批处理之家 (http://bbs.bathome.net/)