sed / awk / perl：找到一个正则表达式，复制该行的5列并粘贴到下一行的开头
[英]sed/awk/perl: find a regex, copy 5 columns of this line and paste to it at the beginning of the next lines
问题描述
我有以下几行：
057 - - No adod3 stptazlqn 10 753
tlm 10 027
stp 10 021
12 - - No azad1
bbcz 30 12
03085 - - No azad1 azad1222
xxaz 1 12
azzst 1 12
hss 2 12
我需要做的是：
- 查找以数字[0-9]开头的行。
- 复制前5列，并用空格''分隔。
- 请将其粘贴在不以数字开头的下一行中。
057 - - No adod3 stptazlqn 10 753 057 - - No adod3 tlm 10 027 057 - - No adod3 stp 10 021 12 - - No azad1 12 - - No azad1 bbcz 30 12 03085 - - No azad1 azad1222 03085 - - No azad1 xxaz 1 12 03085 - - No azad1 azzst 1 12 03085 - - No azad1 hss 2 12
感谢您的任何帮助。
欢呼声，色拉
2 个解决方案
解决方案1
0 已采纳 2018-09-27 19:39:48
awk解救！
$ awk '{if($1+0==$1) p=$1 FS $2 FS $3 FS $4 FS $5; else $0=p FS $0}1' file | column -t
057 - - No adod3 stptazlqn 10 753
057 - - No adod3 tlm 10 027
057 - - No adod3 stp 10 021
12 - - No azad1
12 - - No azad1 bbcz 30 12
03085 - - No azad1 azad1222
03085 - - No azad1 xxaz 1 12
03085 - - No azad1 azzst 1 12
03085 - - No azad1 hss 2 12
FS是字段分隔符，默认情况下是空白。 数字测试是通过零加法完成的； 传递给column以进行漂亮的格式化。 末尾的1是打印行的简写（ $0变量）
解决方案2
0 2018-09-28 06:29:18
这可能对您有用（GNU sed）：
sed -r '/^[0-9]/!G;s/(.*\S)\s*\n((\S+\s*){5}).*/\2 \1/;h' file
使用模式匹配从以整数开头的行中提取字段，该整数将被追加到未添加的行中。
要正确对齐列，请使用：
sed -r '/^[0-9]/!G;s/(.*\S)\s*\n((\S+\s*){5}).*/\2 \1/;h' file | column -t
bash（sed / awk？）在文件中查找行并在上面3行打印内容？
[英]bash (sed/awk?) find line in file and print stuff 3 lines above?
grep，剪切，sed，awk文件的第3列，一次n行，然后粘贴到n行的重复列中？
[英]grep, cut, sed, awk a file for 3rd column, n lines at a time, then paste into repeated columns of n rows?
如何使sed，awk和grep命令忽略以＃开头的行？
[英]How to make any sed, awk, and grep command ignore lines beginning with #?
将基于行首的行中间替换为Sed / Awk / Grep
[英]Replace the middle of the line based on the beginning of the line with Sed/Awk/Grep
声明:本站的技术帖子网页，遵循CC BY-SA 4.0协议，如果您需要转载，请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.