Board logo

标题: [文本处理] [已解决]请问BAT如何去除不完全匹配的重复？ [打印本页]
作者: 每天几分    时间: 2012-10-19 21:38     标题: [已解决]请问BAT如何去除不完全匹配的重复？

本帖最后由 每天几分 于 2012-10-19 23:48 编辑

原文本：

古古怪
古古怪的
反反复
反反复去
吞吞吐吐
吞吞吐吐的
忐忐忑忑
忐忐忑忑地

去除不完全匹配的重复，要求生成新文本如下：

古古怪
反反复
吞吞吐吐
忐忐忑忑
作者: 乱码    时间: 2012-10-19 23:07

  1. Array.prototype.unique = function(){ //排序后去重复

  2.     this.sort();

  3.     for(var i=1; i<this.length; i++){

  4.         this[i].substr(0,this[i-1].length) === this[i-1] && this.splice(i--, 1);

  5.     }

  6.     return this;

  7. }

  8. 

  9. var fso = new ActiveXObject("scripting.filesystemobject");

  10. var words = fso.OpenTextFile("a.txt",1).ReadAll().split('\r\n').unique().join('\r\n');

  11. fso.OpenTextFile("ok.txt",2,1).Write(words);

  12. WSH.echo('处理完成！');
复制代码
保存为 "处理.js" 然后双击运行即可、
如果 "处理.js" 无法运行，改成 "处理.jse" 即可、
水平有限，不会写批处理、、



欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2