批处理之家 - Powered by Discuz! Board

标题: [文本处理] 【已解决】如何用批处理把文本中的数据换个格式？ [打印本页]

作者: tommytangtang 时间: 2014-8-13 20:27 标题: 【已解决】如何用批处理把文本中的数据换个格式？

本帖最后由 tommytangtang 于 2014-8-13 21:11 编辑

有如下格式的文本，数字分隔符为空格。当然数据不止三行
621.9 583.053 8.9
622.0 692.578 3.7
622.2 693.253 4.6
怎么样把这个文本里面的数据每行前面加个数字（从1开始，每行数字加1）和两个逗号，然后把分隔符都变成逗号呢，最后结果是这样的
1,,621.9,583.053,8.9
2,,622.0,692.578,3.7
3,,622.2,693.253,4.6
当然用excel表格也可以做得出来，但是麻烦，用批处理怎么做呢？

作者: CrLf 时间: 2014-8-13 20:41

本帖最后由 CrLf 于 2014-8-13 23:32 编辑

@echo off&setlocal enabledelayedexpansion
(for /f "delims=" %%a in (a.txt) do (
 set /a n+=1
 set "str=%%~a"
 echo !n!,,!str: =,!
))>b.txt
复制代码

作者: tommytangtang 时间: 2014-8-13 20:53

正在测试，文本一共有33M大小，看着新生成的文本在逐渐变大

顺便问下你们回复的贴子里，那个“复制代码”，我复制之后粘贴感觉bat命令都变成一行了
每个行分割的时候文本里面显示的是一个黑色方块

作者: tommytangtang 时间: 2014-8-13 21:06

原来一共有125万多行。。。
总算运行完了，问题已经解决了，谢谢Ctrl
正在看“[系列教程]批处理for语句从入门到精通”这个帖子，希望能尽快把Ctrl的语句全部读懂，自己可以随意转换文本里面的数据格式~~~ for 好强大！
还有，运行的时候怎样不显示cmd窗口呢。。。

作者: Batcher 时间: 2014-8-13 21:36

回复 3# tommytangtang

换个浏览器试试呢

作者: tommytangtang 时间: 2014-8-13 23:17

回复 5# Batcher

不是浏览器，是复制到文本中间后，文本显示黑色的方块代替的回车

刚刚自学了一下for语句，把Ctrl给的代码换了一下，结果是一样的，他的代码有几句没看懂
【set "str=%%~a"
echo !n!,,!str: =,!】

这个是我自己改的
@echo off
(for /f "tokens=1,2,3" %%i in (1.txt) do (
set /a n+=1
setlocal enabledelayedexpansion
echo !n!,,%%i,%%j,%%k
))>1.dat
我这个和Ctrl的哪个好用呢？虽然我这个一直在报错，但是感觉运行速度快一些呢，同样120多万行

作者: CrLf 时间: 2014-8-13 23:31

回复 5# Batcher

建议把 /forumdata/cache/common.js 中 function setCopy(text, msg) 函数最后一句

clipboardswfdata = text;
复制代码

改成

clipboardswfdata = BROWSER.chrome ? text.replace(/\n/g,'\r\n') : text;
复制代码

作者: tommytangtang 时间: 2014-8-13 23:34

刚刚试过了，我自己改的在倒数第二行加上“endlocal”后运行需要十多分钟，
不加“endlocal”虽然他一直报错，但是只要5分钟就搞定了，原数据同样是125万行
谁能解答一下。。。

作者: CrLf 时间: 2014-8-13 23:38

本帖最后由 CrLf 于 2014-8-13 23:39 编辑

回复 6# tommytangtang

解释如下

set "str=%%~a"
::设置 str 为行内容
echo !n!,,!str: =,!
::输出 [行号],,[str空格替换为,后的内容]
复制代码

用 tokens 也行，但 endlocal 需要和 setlocal 对应使用，因为 setlocal 最多只能有 32 层，超过就会报错
忽然发现顶楼文本都是数字，所以 setlocal 就无需放到循环内了，代码已修改，应该快多了
要想更快，推荐用 gawk，专业的文本处理工具：

@gawk -v flag=, "{print NR flag flag $1 flag $2 flag $3}" 1.txt>2.txt
复制代码

作者: Batcher 时间: 2014-8-13 23:46

回复 6# tommytangtang

我的意思就是让你换个浏览器试试能否解决这个问题

作者: tommytangtang 时间: 2014-8-13 23:51

回复 9# CrLf

果然很快，刚刚只用了80多秒就处理完了，非常感谢！

gawk我试试先

作者: CrLf 时间: 2014-8-13 23:58

本帖最后由 CrLf 于 2014-8-14 00:00 编辑

回复 11# tommytangtang

每次 setlocal 都会备份一个新的变量表，大概是因为这个原因所以明显慢了
最多可以备份 31 张变量表，用 endlocal 可以注销最近的那个
每个 cmd.exe 和 call :Function 都独享 32 张表空间，退出进程或函数调用时会自动 endlocal

作者: tommytangtang 时间: 2014-8-14 00:03

回复 10# Batcher

确实是浏览器的原因，用的360.换成ie就没问题了

回复 12# CrLf

好像懂了，初学，呵呵

用gawk还需要另外安装的？

作者: CrLf 时间: 2014-8-14 00:15

回复 13# tommytangtang

下载了扔到 system32 或者脚本所在路径即可：http://bbs.bathome.net/viewthread.php?tid=3981
相信我，你不会后悔下载 gawk 的

作者: tommytangtang 时间: 2014-8-14 00:27

回复 tommytangtang

下载了扔到 system32 或者脚本所在路径即可：
相信我，你不会后悔下载 ...
CrLf 发表于 2014-8-14 00:15

刚刚把他扔到system32了，然后试了一下，几乎是秒生成啊，太厉害了！！！
我要是想用vb编程然后在别的电脑上用，可以操作吗

当然，别的电脑是没有装gawk的电脑

作者: terse 时间: 2014-8-14 00:59

这里的 sed 效率跟不上不贴出了

gawk -vOFS="," "{$1=$1;print NR OFS OFS $0}" a.txt >b.txt
复制代码

作者: tommytangtang 时间: 2014-8-14 01:13

回复 16# terse

没看懂。。。

欢迎光临批处理之家 (http://bbs.bathome.net/)