|
youaoyi
初级用户
积分 154
发帖 67
注册 2007-10-31
状态 离线
|
『楼 主』:
求一个在文本首行添加一行的批处理
求一个可以根据文本中第一行的“|”个数，
在首行新增“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 |
|
|
 2008-9-18 22:36 |
|
|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
『第
2 楼』:
文本超过10MB的话还是GAWK快
|
|
|
2008-9-18 22:39 |
|
|
moniuming
银牌会员
永远的菜鸟
积分 1335
发帖 574
注册 2007-11-27
来自 广西
状态 离线
|
『第
3 楼』:
其它的工具不会,试试这个?
@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
|
|
|
2008-9-18 23:25 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
4 楼』:
@echo off
set /p str=<a.txt
set n=0
:begin
if "%str:~0,1%" equ "|" (
set /a n+=1
)
set "str=%str:~1%"
if "%str%" neq "" (
goto :begin
)
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
|
 |
|
|
2008-9-18 23:26 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
5 楼』:
只顾着和朋友聊天了，贴代码的速度比 moniuming 兄慢了1分钟，呵呵，思路很相似。
|
|
|
|
2008-9-18 23:31 |
|
|
youaoyi
初级用户
积分 154
发帖 67
注册 2007-10-31
状态 离线
|
『第
6 楼』:
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就可以了，
可是我不会写 。。。。
|
|
|
2008-9-18 23:40 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
7 楼』:
取第一行，不必用sed，用set即可。
替换字符不是有人帮你写出来了么？3、4楼的代码能理解否？
|
|
|
|
2008-9-18 23:44 |
|
|
youaoyi
初级用户
积分 154
发帖 67
注册 2007-10-31
状态 离线
|
『第
8 楼』:
嗯 明天睡醒再仔细想想 参悟一下 。。。
说实话，以我目前的水平，尚不能理解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
|
|
|
2008-9-18 23:53 |
|
|
pooronce
中级用户
积分 484
发帖 250
注册 2007-6-5
状态 离线
|
『第
9 楼』:
gawk -F "|" "{if (FNR==1){for (i=1;i<NF;i++){printf(\"0^|\");}printf(\"\n\");}print}" a.txt
|
|
|
2008-9-19 00:05 |
|
|
pooronce
中级用户
积分 484
发帖 250
注册 2007-6-5
状态 离线
|
『第
10 楼』:
样本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
|
|
|
2008-9-19 00:23 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
11 楼』:
Re 4楼
关于统计|的个数，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
|
|
|
|
2008-9-19 16:43 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
12 楼』:
Re 11楼
没有理解清楚 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
|
|
|
|
2008-9-19 17:35 |
|
|
moniuming
银牌会员
永远的菜鸟
积分 1335
发帖 574
注册 2007-11-27
来自 广西
状态 离线
|
『第
13 楼』:
Originally posted by youaoyi at 2008-9-18 23:53:
| Quote: | 我六楼的想法产生的原因是，如果样本是下面这样：
样本： 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% 这个应该就是你想要的结果了吧...
|
|
|
2008-9-20 17:10 |
|
