中国DOS联盟

求一个可以根据文本中第一行的“|”个数，

在首行新增“0|0|0|0|0|0|” 一行的批处理。

SED CHANGE GAWK 之类的命令都可以，只求速度。

样本： a.txt

1|0757 | 合同 | 其它 | 殷晏 | 200837015029392 | 4000.0 |
2|0752 | 合同 | 经济原因 | 葛宝 | 200000026251 | 10232.35 |
3|2810 | 合同 | 经济原因 | 王传 | 2002810000013079 | 479.0 |

样本 a.txt 第一行有 7个“|”符，希望得到的结果如下：

0|0|0|0|0|0|0|
1|0757 | 合同 | 其它 | 殷晏 | 200837015029392 | 4000.0 |
2|0752 | 合同 | 经济原因 | 葛宝 | 200000026251 | 10232.35 |
3|2810 | 合同 | 经济原因 | 王传 | 2002810000013079 | 479.0 |

文本超过10MB的话还是GAWK快

其它的工具不会,试试这个?
@echo off setlocal enabledelayedexpansion for /f "delims=" %%a in ('type 1.txt') do ( set "str=%%a" goto :out ) :out if not "!str!"=="" ( set "var=!str:~,1!" set "str=!str:~1!" if "!var!"=="|" set /a n+=1 goto :out ) for /l %%a in (1 1 %n%) do (>>tem_.txt set /p=0^|<nul) >>tem_.txt echo. copy tem_.txt/b+1.txt/b temp_.txt del tem_.txt echo move /y temp_.txt 1.txt start temp_.txt

只顾着和朋友聊天了，贴代码的速度比 moniuming 兄慢了1分钟，呵呵，思路很相似。

1、sed "1q" a.txt>new.txt
2、for /F "tokens=1,* delims=|" %i in (new.txt) do ？？？？
3、copy new.txt + a.txt

第二步需要将这个new.txt中只有一行的文本，“|”之外的都替换成0就可以了，

可是我不会写 。。。。

取第一行，不必用sed，用set即可。
替换字符不是有人帮你写出来了么？3、4楼的代码能理解否？

嗯 明天睡醒再仔细想想 参悟一下 。。。

说实话，以我目前的水平，尚不能理解3、4楼的代码

我六楼的想法产生的原因是，如果样本是下面这样：

样本： B.txt （最后一位后面没有“|”分隔符）

1|0757 | 合同 | 其它 | 殷晏 | 200837015029392 | 4000.0
2|0752 | 合同 | 经济原因 | 葛宝 | 200000026251 | 10232.35
3|2810 | 合同 | 经济原因 | 王传 | 2002810000013079 | 479.0

也能够生成与之对应的行：

0|0|0|0|0|0|0
1|0757 | 合同 | 其它 | 殷晏 | 200837015029392 | 4000.0
2|0752 | 合同 | 经济原因 | 葛宝 | 200000026251 | 10232.35
3|2810 | 合同 | 经济原因 | 王传 | 2002810000013079 | 479.0

样本B的：
gawk "BEGIN{FS=OFS=\"^|\"}FNR==1{tmp=$0;for (i=1;i<=NF;i++){$i=0}print;print tmp}FNR>1{print}" b.txt

关于统计|的个数，namejm 兄给出了另外一个思路（不必逐个判断字符）：
@echo off set /p str=<a.txt set n=0 :loop set "str=%str:*|=%" set /a n+=1 if "%str%" neq "" ( if "%str%" neq " " ( goto :loop ) ) type nul>b.txt for /l %%a in (1,1,%n%) do ( set /p t=0^|<nul>>b.txt ) echo.>>b.txt copy /b b.txt+a.txt c.txt>nul move /y c.txt a.txt del /q b.txt

没有理解清楚 namejm 兄的完整本意，更改如下（不必使用两层if）：
@echo off set /p str=<a.txt set "str=%str%|" set n=0 :loop set "str=%str:*|=%" if "%str%" neq "" ( set /a n+=1 goto :loop ) type nul>b.txt for /l %%a in (1,1,%n%) do ( set /p t=0^|<nul>>b.txt ) echo.>>b.txt copy /b b.txt+a.txt c.txt>nul move /y c.txt a.txt del /q b.txt

Originally posted by youaoyi at 2008-9-18 23:53:

我六楼的想法产生的原因是，如果样本是下面这样：

样本： B.txt （最后一位后面没有“|”分隔符）

1|0757 | 合同 | 其它 | 殷晏 | 200837015029392 | 4000.0
2|0752 | 合同 | 经济原因 | 葛宝 | 200000026251 | 10232.35
3|2810 | 合同 | 经济原因 | 王传 | 2002810000013079 | 479.0

也能够生成与之对应的行：

0|0|0|0|0|0|0
1|0757 | 合同 | 其它 | 殷晏 | 200837015029392 | 4000.0
2|0752 | 合同 | 经济原因 | 葛宝 | 200000026251 | 10232.35
3|2810 | 合同 | 经济原因 | 王传 | 2002810000013079 | 479.0

@echo off setlocal enabledelayedexpansion for /f "delims=" %%a in ('type 1.txt') do ( set "str=%%a" goto :out ) :out if "!str:~-1!"==" " ( set "str=!str:~,-1!"&goto :out ) else ( if "!str:~-1!"=="　" (set "str=!str:~,-1!"&goto :out) ) if "!str:~-1!"=="|" (set "god=batch_fan") :agn for /f "tokens=1* delims=|" %%a in ("!str!") do ( set /a "n+=1" if not "%%b"=="" (set "str=%%b"&goto :agn) ) for /l %%a in (1 1 %n%) do (set "var=!var!0|") if defined god ( >tem_.txt echo !var! ) else ( >tem_.txt echo !var:~0,-1! ) copy tem_.txt/b+1.txt/b temp_.txt del tem_.txt move /y temp_.txt 1.txt start 1.txt msg %username% 这个应该就是你想要的结果了吧...