[文本处理] 批处理如何将逢4的半角空格替换为全角空格？

xp3000

几十mb大容量TXT文本有大量半角空格，
读取半角空格部分，将每4次出现的半角空格替换为全角空格，
如何快速替换？

Five66

用powershell或vbs或jscript或其他

xp3000

//&cls&dir /b *.txt|cscript -nologo -e:jscript "%~f0"&pause&exit
fso = new ActiveXObject("Scripting.FileSystemObject");
while (!WSH.StdIn.AtEndOfStream) {
    f = WSH.StdIn.ReadLine();
    content = fso.OpenTextFile(f,1).ReadAll();
var newContent = '';
var count = 0;
// 遍历字符串中的每个字符
for (var i = 0; i < content.length; i++) {
    var char = content.charAt(i);
    if (char == ' ') {
        count += 1;
        if (count == 4) {
            count = 0;
            newContent += '　'; 
        } else {
            newContent += char;
        }
    } else {
        newContent += char; 
    }
}
    fso.OpenTextFile(f,2,true).Write(newContent);
}
复制代码

效率不高

_avatar_

回复 3# xp3000


    都用 javascript 了，那可以考虑更方便的正则呀！
content.replace(/半角空格/g, function() { return count++ != 0 && count % 4 == 0 ? 全角空格 : 半角空格;}

把上面中文替换成对应的全角或半角空格就可以啦。