onl*_*lyf 0 bash perl awk insert
我有以下问题:
有一个文件,制表符分隔:
Code1 Number1 Name1 Phone1
Code2 Number2 Name2 Phone2
Code3 Number3 Name3 Phone3
Code4 Number4 Name4 Phone4
Run Code Online (Sandbox Code Playgroud)
我有一个文件:
Surname 1
Surname 2
Surname 3
Surname 4
Run Code Online (Sandbox Code Playgroud)
我想要的输出是:
Code1 Number1 Name1 Surname1 Phone1
Code1 Number1 Name1 Surname2 Phone1
Code1 Number1 Name1 Surname3 Phone1
Code1 Number1 Name1 Surname4 Phone1
Run Code Online (Sandbox Code Playgroud)
我知道我可能必须使用awk,但我只知道如何在其他人之间插入一个固定值的列,使用:
awk '{ $2=$2"newvalue" print $0 }'
Run Code Online (Sandbox Code Playgroud)
但是我不知道如何从另一个文件中读取行并将它们存储在newvalue中以关闭上面所需的输出.我不需要特定的awk建议.谢谢您的帮助.
用糊状和awk;
user@host:/tmp$ paste file1 file2 | awk '{print $1, $2, $3, $5$6, $4}' | column -t
Code1 Number1 Name1 Surname1 Phone1
Code1 Number1 Name1 Surname2 Phone1
Code1 Number1 Name1 Surname3 Phone1
Code1 Number1 Name1 Surname4 Phone1
Run Code Online (Sandbox Code Playgroud)
paste用于连接文件
column -t用于漂亮的格式化;