[已解决]批处理如何替换重复的字符

xudaweb

1. TX13P,,,,,,,,A7,,,,,,,,,,,Serdes_Driver,,,,,,SIG,,,,,,,,,,,,,,,,----
   
2. GND,,,,,,,,,,A8,,,,,,,,,,,----,,,,,,,,,,,,,,,GND,,,,,,,,,,,,,,,,----
   
3. TDI,,,,,,,,,,A9,,,,,,,,,,,CMOS,,,,,,,,,,,,,,,TST,,,,,,,,,,,,,,,,1.8V

复制代码

想要把重复的多个逗号，替换成一个逗号，如何实现？

CrLf

1. @echo off
   
2. (for /f "delims=" %%a in (a.txt) do (
   
3.    set str=%%a
   
4.    setlocal enabledelayedexpansion
   
5.    for %%b in (",,,,,,,," ",,,," ",," ",,") do set "str=!str:%%~b=,!"
   
6.    echo !str!
   
7.    endlocal
   
8. ))>b.txt

复制代码

DAIC

1. sed "s/,\+/,/g" a.txt > b.txt

复制代码

terse

1. @ECHO OFF
   
2. (mshta "javascript:with(new ActiveXObject('Scripting.FileSystemObject')){GetStandardStream(1).Write(GetStandardStream(0).readall().replace(/(\,)+/g,'$1'));close()}"|more)<a.txt>b2.txt
   
3. pause

复制代码

hu_contact

我搞的太复杂了。。。不过更深体会到了变量延迟的内容

1. @echo off
   
2. echo 【提示】代码用“畱”作为段落标识符，如果文中有该字，应改为文中没有的符号！
   
3. for /f %%w in (test.txt) do call set all=%%all%%畱%%w
   
4. :continue
   
5. for /f "delims=畱 tokens=1,*" %%p in ("%all%") do (
   
6.         set line=%%p
   
7.         set all=%%q
   
8. )
   
9. if "%line%"=="" (call :over) else (call :lineDispose)
   
10. 
    
11. :lineDispose
    
12. :continueDispose
    
13. for /f "delims=, tokens=1,*" %%i in ("%line%") do (
    
14.         call set newLine=%%newLine%%,%%i
    
15.         set line=%%j
    
16. )
    
17. if "%line%"=="" (echo %newLine:~1%&set newLine=&goto continue) else (goto continueDispose)
    
18. pause>nul
    
19. 
    
20. :over
    
21. echo 工作已经完成，按任意键退出。&pause>nul&exit

复制代码

CrLf

回复 4# terse


    竟然还有这好东西 GetStandardStream()，看来太小看 fso 了...

xudaweb

能简单解释一下这句么？为什么挑8,4,2,2作为判断准则？

1. for %%b in (",,,,,,,," ",,,," ",," ",,") do set "str=!str:%%~b=,!"

复制代码

回复 2# CrLf

CrLf

回复 7# xudaweb


    二分法，大致思路是每次将 , 的数量减半。最后如果出现 ,,, 被替换成 ,, 的情况，用 set "str=!str:,,=,!" 可以再将其替换为 ,

terse

回复 7# xudaweb

假设文本里含连续62个 ","
第一次循环每8个替换成一个 "," 替换后为13个连续 ","
第二次循环每4个替换成一个 "," 替换后为4个连续 ","
第三次循环每2个替换成一个 "," 替换后为2个连续 ","
第四次循环每2个替换成一个 "," 最终为1个  ","

cjy000

竟然还有这好东西 GetStandardStream()，看来太小看 fso 了...