批处理如何删除txt中每行行首/开头指定字符前的字符串重复出现超过指定次数的行？

Rasm

现在遇到一个文本，里面有重复的，行数各不同，想把多次出现的删掉。处理的内容如下：


111-ewqrewe
111-erqwrqew111
111-ffwefawe
111-fewfawef
222-efqawfa
222-eqfawf
333-fewafa
333-ewafqaw
333-wefqaf
333-ewfqfw
333-ewfqawf

=================
就是想把分隔符【-】前面的内容如果重复5次以上的，就全部删掉，不知道该怎么写批处理

pcl_test

嗯，你以前的贴
http://www.bathome.net/viewthread.php?tid=25488

pcl_test

1. //&cls&cscript -nologo -e:jscript "%~f0"<"1.txt"&pause&exit
   
2. 
   
3. var n=5;
   
4. var c='-';  //指定分隔符
   
5. var txt = WSH.StdIn.ReadAll().split(/\r\n/), a={}, b={}, s='';
   
6. for(var i=0;i<txt.length; i++){
   
7.     var str = txt[i].split(c)[0];
   
8.     a[str]?a[str]++:a[str]=1;
   
9.     b[str]?b[str]+=txt[i]+'\r\n':b[str]=txt[i]+'\r\n';
   
10. }
    
11. for(var i in a){if(a[i] < n)s+=b[i];}
    
12. //(new ActiveXObject('Scripting.FileSystemObject')).OpenTextFile('结果.txt', 2, true).Write(s);
    
13. WSH.echo(s);

复制代码