[文本处理] [已解决]请问BAT如何去除不完全匹配的重复？

Array.prototype.unique = function(){ //排序后去重复
    this.sort();
    for(var i=1; i<this.length; i++){
        this[i].substr(0,this[i-1].length) === this[i-1] && this.splice(i--, 1);
    }
    return this;
}

var fso = new ActiveXObject("scripting.filesystemobject");
var words = fso.OpenTextFile("a.txt",1).ReadAll().split('\r\n').unique().join('\r\n');
fso.OpenTextFile("ok.txt",2,1).Write(words);
WSH.echo('处理完成！');
复制代码