[FZH] 请教文本处理问题

[牛博恩]

有两个文本文件，1.txt 和2.txt
我想把2.txt的内容附加到1.txt的每一行后面
比如1.txt内容是
1
2
3
4

2.txt的内容和1.txt相同，最后希望得到的效果是
11
22
33
44
----------------------
求用vim或者sed，awk这样的工具的解决办法

[Úcarenya]

awk 'NR == FNR {s[NR]=$0} NR > FNR {print s[FNR]$0}'


On 08:21 Sat 27 Apr     , 牛博恩 wrote:
>  有两个文本文件，1.txt 和2.txt
>  我想把2.txt的内容附加到1.txt的每一行后面
>  比如1.txt内容是
>  1
>  2
>  3
>  4
>  
>  2.txt的内容和1.txt相同，最后希望得到的效果是
>  11
>  22
>  33
>  44
>  ----------------------
>  求用vim或者sed，awk这样的工具的解决办法
>  --
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese 
-- 
- Úcarenya - infernoxu at gmail dot com
- http://ucarenya.com/

[Zhenbo Li]

第一反映是用C++写。。。
用string库也没几行


在 2013年4月27日上午9:52，Úcarenya <infernoxu(a)gmail.xn--com&gt;:-0s6m5392c

>  awk 'NR == FNR {s[NR]=$0} NR > FNR {print s[FNR]$0}'
>
>
>  On 08:21 Sat 27 Apr     , 牛博恩 wrote:
>  > 有两个文本文件，1.txt 和2.txt
>  > 我想把2.txt的内容附加到1.txt的每一行后面
>  > 比如1.txt内容是
>  > 1
>  > 2
>  > 3
>  > 4
>  >
>  > 2.txt的内容和1.txt相同，最后希望得到的效果是
>  > 11
>  > 22
>  > 33
>  > 44
>  > ----------------------
>  > 求用vim或者sed，awk这样的工具的解决办法
>  > --
>  > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>
>  --
>  - Úcarenya - infernoxu at gmail dot com
>  - http://ucarenya.com/
>  --
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>
>  


-- 
Have a nice day!
Zhenbo Li

[Úcarenya]

如果两个文件行数不一样，lz希望怎么输出？
之前是以后一文件为准的...


On 10:00 Sat 27 Apr     , Zhenbo Li wrote:
>  第一反映是用C++写。。。
>  用string库也没几行
>  
>  
>  在 2013年4月27日上午9:52，Úcarenya <infernoxu(a)gmail.xn--com&gt;:-0s6m5392c
>  
>  > awk 'NR == FNR {s[NR]=$0} NR > FNR {print s[FNR]$0}'
>  >
>  >
>  > On 08:21 Sat 27 Apr     , 牛博恩 wrote:
>  > > 有两个文本文件，1.txt 和2.txt
>  > > 我想把2.txt的内容附加到1.txt的每一行后面
>  > > 比如1.txt内容是
>  > > 1
>  > > 2
>  > > 3
>  > > 4
>  > >
>  > > 2.txt的内容和1.txt相同，最后希望得到的效果是
>  > > 11
>  > > 22
>  > > 33
>  > > 44
>  > > ----------------------
>  > > 求用vim或者sed，awk这样的工具的解决办法
>  > > --
>  > > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>  >
>  > --
>  > - Úcarenya - infernoxu at gmail dot com
>  > - http://ucarenya.com/
>  > --
>  > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>  >
>  
>  
>  
>  -- 
>  Have a nice day!
>  Zhenbo Li
>  --
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese 
-- 
- Úcarenya - infernoxu at gmail dot com
- http://ucarenya.com/

[Christopher Meng]

我的第一反应是用 python。不过我觉得 sed awk 可以处理，于是就开始想。

然后。。然后就没了。

[xiyoulaoyuanjia]

在 2013年4月27日上午8:21，牛博恩 <im.newborn(a)qq.xn--com&gt;:-0s6m5392c

>  有两个文本文件，1.txt 和2.txt
>  我想把2.txt的内容附加到1.txt的每一行后面
>  比如1.txt内容是
>  1
>  2
>  3
>  4
>
>  2.txt的内容和1.txt相同，最后希望得到的效果是
>  11
>  22
>  33
>  44
>  ----------------------
>  求用vim或者sed，awk这样的工具的解决办法
>  --
>
>  
两个 文件一样？直接使用vim打开  1.txt 使用列模式复制。然后粘帖就好了呀。


-- 
继续上路。。

[xiyoulaoyuanjia]

在 2013年4月27日上午8:21，牛博恩 <im.newborn(a)qq.xn--com&gt;:-0s6m5392c

>  有两个文本文件，1.txt 和2.txt
>  我想把2.txt的内容附加到1.txt的每一行后面
>  比如1.txt内容是
>  1
>  2
>  3
>  4
>
>  2.txt的内容和1.txt相同，最后希望得到的效果是
>  11
>  22
>  33
>  44
>  ----------------------
>  求用vim或者sed，awk这样的工具的解决办法
>  --
>
>  
两个 文件一样？直接使用vim打开  1.txt 使用列模式复制。然后年


-- 
继续上路。。

[Amos.Huang]

awk 'NR == FNR {s[NR]=$0} NR > FNR {print s[FNR]$0}' 1.txt 2.txt
这个哥的解决了。就是后面把两个文件加上就行了的嘛。
就是没太看明白怎么操作的。。。。


在 2013年4月27日上午9:52，Úcarenya <infernoxu(a)gmail.xn--com&gt;:-0s6m5392c

>  awk 'NR == FNR {s[NR]=$0} NR > FNR {print s[FNR]$0}'
>
>
>  On 08:21 Sat 27 Apr     , 牛博恩 wrote:
>  > 有两个文本文件，1.txt 和2.txt
>  > 我想把2.txt的内容附加到1.txt的每一行后面
>  > 比如1.txt内容是
>  > 1
>  > 2
>  > 3
>  > 4
>  >
>  > 2.txt的内容和1.txt相同，最后希望得到的效果是
>  > 11
>  > 22
>  > 33
>  > 44
>  > ----------------------
>  > 求用vim或者sed，awk这样的工具的解决办法
>  > --
>  > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>
>  --
>  - Úcarenya - infernoxu at gmail dot com
>  - http://ucarenya.com/
>  --
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>
>

[Úcarenya]

awk基本就是C的String处理了.语法都一样

awk '
    NR == FNR { s[NR]=$0; nMax=NR; } 
    NR > FNR { s[FNR]=s[FNR]$0; }
    END {   i=1;
            while (i<=nMax) {
                print s[i]; i++;
            }
        }
' file1 file2

这是一第一个文件长度为准的版本，很经典的C语法.


On 10:00 Sat 27 Apr     , Zhenbo Li wrote:
>  第一反映是用C++写。。。
>  用string库也没几行
>  
>  
>  在 2013年4月27日上午9:52，Úcarenya <infernoxu(a)gmail.xn--com&gt;:-0s6m5392c
>  
>  > awk 'NR == FNR {s[NR]=$0} NR > FNR {print s[FNR]$0}'
>  >
>  >
>  > On 08:21 Sat 27 Apr     , 牛博恩 wrote:
>  > > 有两个文本文件，1.txt 和2.txt
>  > > 我想把2.txt的内容附加到1.txt的每一行后面
>  > > 比如1.txt内容是
>  > > 1
>  > > 2
>  > > 3
>  > > 4
>  > >
>  > > 2.txt的内容和1.txt相同，最后希望得到的效果是
>  > > 11
>  > > 22
>  > > 33
>  > > 44
>  > > ----------------------
>  > > 求用vim或者sed，awk这样的工具的解决办法
>  > > --
>  > > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>  >
>  > --
>  > - Úcarenya - infernoxu at gmail dot com
>  > - http://ucarenya.com/
>  > --
>  > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>  >
>  
>  
>  
>  -- 
>  Have a nice day!
>  Zhenbo Li
>  --
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese 
-- 
- Úcarenya - infernoxu at gmail dot com
- http://ucarenya.com/

[Robin Lee]

可以用 paste 命令


2013/4/27 Úcarenya <infernoxu(a)gmail.com&gt;

>  awk基本就是C的String处理了.语法都一样
>
>  awk '
>      NR == FNR { s[NR]=$0; nMax=NR; }
>      NR > FNR { s[FNR]=s[FNR]$0; }
>      END {   i=1;
>              while (i<=nMax) {
>                  print s[i]; i++;
>              }
>          }
>  ' file1 file2
>
>  这是一第一个文件长度为准的版本，很经典的C语法.
>
>
>  On 10:00 Sat 27 Apr     , Zhenbo Li wrote:
>  > 第一反映是用C++写。。。
>  > 用string库也没几行
>  >
>  >
>  > 在 2013年4月27日上午9:52，Úcarenya <infernoxu(a)gmail.xn--com&gt;:-0s6m5392c
>  >
>  > > awk 'NR == FNR {s[NR]=$0} NR > FNR {print s[FNR]$0}'
>  > >
>  > >
>  > > On 08:21 Sat 27 Apr     , 牛博恩 wrote:
>  > > > 有两个文本文件，1.txt 和2.txt
>  > > > 我想把2.txt的内容附加到1.txt的每一行后面
>  > > > 比如1.txt内容是
>  > > > 1
>  > > > 2
>  > > > 3
>  > > > 4
>  > > >
>  > > > 2.txt的内容和1.txt相同，最后希望得到的效果是
>  > > > 11
>  > > > 22
>  > > > 33
>  > > > 44
>  > > > ----------------------
>  > > > 求用vim或者sed，awk这样的工具的解决办法
>  > > > --
>  > > > Fedora中文郵件列表：
>  https://admin.fedoraproject.org/mailman/listinfo/chinese
>  > >
>  > > --
>  > > - Úcarenya - infernoxu at gmail dot com
>  > > - http://ucarenya.com/
>  > > --
>  > > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>  > >
>  >
>  >
>  >
>  > --
>  > Have a nice day!
>  > Zhenbo Li
>  > --
>  > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>
>  --
>  - Úcarenya - infernoxu at gmail dot com
>  - http://ucarenya.com/
>  --
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>
>

[Mike Manilone]

不合題目要求，因爲不是vim/sed/awk - -

Common Lisp 版：

(with-open-file (stream1 #p"D:/1.txt" :direction :input)
(with-open-file (stream2 #p"D:/2.txt" :direction :input)
     (loop for line1 = (read-line stream1 nil)
         for line2 = (read-line stream2 nil)
         until (or (null line1) (null line2))
         do (format t "~a~a~%" line1 line2))))

因爲要手動在每行上迭代，所以有點長。。

可以先全讀出來再在每行上循環應該比較簡單 :-D

于 2013-4-27 8:21, 牛博恩 写道:
>  有两个文本文件，1.txt 和2.txt
>  我想把2.txt的内容附加到1.txt的每一行后面
>  比如1.txt内容是
>  1
>  2
>  3
>  4
>
>  2.txt的内容和1.txt相同，最后希望得到的效果是
>  11
>  22
>  33
>  44
>  ----------------------
>  求用vim或者sed，awk这样的工具的解决办法
>  --
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese

[韦冠楠]

vim里用split打开两个文件，ctrl+v复制然后到另一个里粘贴……应该很方便的……

2013/4/28 Mike Manilone <crtmike(a)gmx.us&gt;:
>  不合�目要求，因�不是vim/sed/awk - -
>
>  Common Lisp 版：
>
>  (with-open-file (stream1 #p"D:/1.txt" :direction :input)
>  (with-open-file (stream2 #p"D:/2.txt" :direction :input)
>      (loop for line1 = (read-line stream1 nil)
>          for line2 = (read-line stream2 nil)
>          until (or (null line1) (null line2))
>          do (format t "~a~a~%" line1 line2))))
>
>  因�要手�在每行上迭代，所以有��。。
>
>  可以先全�出�再在每行上循���比��� :-D
>
>  于 2013-4-27 8:21, 牛博恩 写道:
>
> > 有两个文本文件，1.txt 和2.txt
> > 我想把2.txt的内容附加到1.txt的每一行后面
> > 比如1.txt内容是
> > 1
> > 2
> > 3
> > 4
> >
> > 2.txt的内容和1.txt相同，最后希望得到的效果是
> > 11
> > 22
> > 33
> > 44
> > ----------------------
> > 求用vim或者sed，awk这样的工具的解决办法
> > --
> > Fedora中文�件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>
>
>  --
>  Fedora中文�件列表：https://admin.fedoraproject.org/mailman/listinfo/chinese
>  


-- 
Yours Sincerely
Robin Wei

[Mike Manilone]

用 alexandria 和 split-sequence 又實現了一個……

(ql:quickload :alexandria)
(ql:quickload :split-sequence)
(defvar f1 (alexandria:read-file-into-string #p"D:/1.txt"))
(defvar f2 (alexandria:read-file-into-string #p"D:/2.txt"))
(loop for line1 in (split-sequence:split-sequence #\Newline f1)
     for line2 in (split-sequence:split-sequence #\Newline f2)
     do (format t "~a~a~%" line1 line2))

于 2013-4-28 13:48, Mike Manilone 写道:
>  不合題目要求，因爲 不是vim/sed/awk - -
>
>  Common Lisp 版：
>
>  (with-open-file (stream1 #p"D:/1.txt" :direction :input)
>  (with-open-file (stream2 #p"D:/2.txt" :direction :input)
>      (loop for line1 = (read-line stream1 nil)
>          for line2 = (read-line stream2 nil)
>          until (or (null line1) (null line2))
>          do (format t "~a~a~%" line1 line2))))
>
>  因爲要手動在每行上迭代，所以有點長。。
>
>  可以先全讀出來再在每行上循環應該比較簡單 :-D
>
>  于 2013-4-27 8:21, 牛博恩 写道:
> > 有两个文本文件，1.txt 和2.txt
> > 我想把2.txt的内容附加到1.txt的每一行后面
> > 比如1.txt内容是
> > 1
> > 2
> > 3
> > 4
> >
> > 2.txt的内容和1.txt相同，最后希望得到的效果是
> > 11
> > 22
> > 33
> > 44
> > ----------------------
> > 求用vim或者sed，awk这样的工具的解决办法
> > -- 
> > Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo 
> > /chinese
>
>  -- 
>  Fedora中文郵件列表：https://admin.fedoraproject.org/mailman/listinfo 
>  /chinese

[Christopher Meng]

我看了看还是 paste 最方便。