使用sed或awk在特定的行号处插入一行


146

我有一个脚本文件,需要用另一个脚本进行修改才能在第8行插入文本。

要插入的字符串:Project_Name=sowstest,到名为的文件中start

我尝试使用awk和sed,但是我的命令出现乱码。

Answers:


231
sed -i '8i8 This is Line 8' FILE

在第8行插入

8 This is Line 8

进入文件FILE

-i 如glenn jackman的注释中所述,直接对文件FILE进行修改,而对stdout没有输出。


3
是的,-i开关特定于GNU-sed。
用户未知

1
否。-i表示“就地修改指定的文件”。插入与追加是通过与-i开关无关的'8isomething'与'8asomething'来实现的。
不明的使用者

11
Mac用户:使用自制软件,brew install gnu-sed然后将其与gsed
cwd

4
这超级有用!无论如何,我在行首插入空格吗?我注意到sed没有注意初始空格...
elju

9
@elju:是的,请使用反斜杠将其屏蔽:sed '8i\ 8 This is Line 8' FILE
不知名的使用者



18

awk答案

awk -v n=8 -v s="Project_Name=sowstest" 'NR == n {print s} {print}' file > file.new

@glenn jackman我需要输入#define SERVER@"http://10.35.42.54/ms0.8"到特定行。我该如何实现?
Nevin Raj Victor

1
我认为,内文只需要用反斜杠逃脱他的弦乐报价
克里斯Koknat

@waLLe,从awk信息页面开始,该页面很好地描述了awk的工作方式。在这里,我有2个“条件{action}”对,第二对没有条件,这意味着将对每个记录执行该操作。阅读完后仍然有疑问,请告诉我。
格伦·杰克曼

@glennjackman快到了..只是没有得到这个:file> file.new
w411

“文件”代表awk正在处理的文件的名称。>是shell 重定向符号,因此awk的输出存储在名为“ file.new”的文件中。
glenn jackman

16

POSIX sed(并且例如OS X的sed,在sed下面)要求i应遵循的一个反斜杠和换行。另外,至少OS X sed在插入的文本之后不包含换行符:

$ seq 3|gsed '2i1.5'
1
1.5
2
3
$ seq 3|sed '2i1.5'
sed: 1: "2i1.5": command i expects \ followed by text
$ seq 3|sed $'2i\\\n1.5'
1
1.52
3
$ seq 3|sed $'2i\\\n1.5\n'
1
1.5
2
3

要替换一行,可以使用带有数字地址的c(更改)或s(替换)命令:

$ seq 3|sed $'2c\\\n1.5\n'
1
1.5
3
$ seq 3|gsed '2c1.5'
1
1.5
3
$ seq 3|sed '2s/.*/1.5/'
1
1.5
3

替代使用awk

$ seq 3|awk 'NR==2{print 1.5}1'
1
1.5
2
3
$ seq 3|awk '{print NR==2?1.5:$0}'
1
1.5
3

awk在传递的变量中解释反斜杠,-v但在使用传递的变量中不反斜杠ENVIRON

$ seq 3|awk -v v='a\ba' '{print NR==2?v:$0}'
1
a
3
$ seq 3|v='a\ba' awk '{print NR==2?ENVIRON["v"]:$0}'
1
a\ba
3

两者ENVIRON-v都由POSIX定义。


7

Perl解决方案:

快速又肮脏:

perl -lpe 'print "Project_Name=sowstest" if $. == 8' file

  • -l 删除换行符并将其添加回去,从而无需使用“ \ n”
  • -p 循环输入文件,打印每一行
  • -e 用单引号执行代码

$. 是行号

等效于@glenn的awk解决方案,使用命名参数:

perl -slpe 'print $s if $. == $n' -- -n=8 -s="Project_Name=sowstest" file

  • -s 启用基本参数解析器
  • -- 防止-n和-s被标准perl参数解析器解析

位置命令参数:

perl -lpe 'BEGIN{$n=shift; $s=shift}; print $s if $. == $n' 8 "Project_Name=sowstest" file

环境变量:

setenv n 8 ; setenv s "Project_Name=sowstest"
echo $n ; echo $s
perl -slpe 'print $ENV{s} if $. == $ENV{n}' file

ENV 是包含所有环境变量的哈希

Getopt将参数解析为哈希%o:

perl -MGetopt::Std -lpe 'BEGIN{getopt("ns",\%o)}; print $o{s} if $. == $o{n}' -- -n 8 -s "Project_Name=sowstest" file

Getopt ::长而长的选项名称

perl -MGetopt::Long -lpe 'BEGIN{GetOptions(\%o,"line=i","string=s")}; print $o{string} if $. == $o{line}' -- --line 8 --string "Project_Name=sowstest" file

Getopt是推荐的标准库解决方案。
对于单行的perl脚本来说,这可能是多余的,但是可以做到。


2
克里斯感谢您抽出宝贵的时间解释所有内容并很好地进行了排列,但是,这就是为什么我不喜欢perl的原因。
rsaw

5

对于使用非GNU的SunOS的用户,以下代码将有所帮助:

sed '1i\^J
line to add' test.dat > tmp.dat
  • ^ J与^ V + ^ J一起插入
  • 在'1i之后添加换行符。
  • \必须是该行的最后一个字符。
  • 命令的第二部分必须在第二行。

5

sed -e '8iProject_Name=sowstest' -i start 使用GNU sed

样品运行:

[root@node23 ~]# for ((i=1; i<=10; i++)); do echo "Line #$i"; done > a_file
[root@node23 ~]# cat a_file
Line #1
Line #2
Line #3
Line #4
Line #5
Line #6
Line #7
Line #8
Line #9
Line #10
[root@node23 ~]# sed -e '3ixxx inserted line xxx' -i a_file 
[root@node23 ~]# cat -An a_file 
     1  Line #1$
     2  Line #2$
     3  xxx inserted line xxx$
     4  Line #3$
     5  Line #4$
     6  Line #5$
     7  Line #6$
     8  Line #7$
     9  Line #8$
    10  Line #9$
    11  Line #10$
[root@node23 ~]# 
[root@node23 ~]# sed -e '5ixxx (inserted) "line" xxx' -i a_file
[root@node23 ~]# cat -n a_file 
     1  Line #1
     2  Line #2
     3  xxx inserted line xxx
     4  Line #3
     5  xxx (inserted) "line" xxx
     6  Line #4
     7  Line #5
     8  Line #6
     9  Line #7
    10  Line #8
    11  Line #9
    12  Line #10
[root@node23 ~]# 

$插入后尾随3号线在哪里?
jww

-A国旗到cat:)
jno

如果要插入的字符串包含引号,括号等怎么办?
Anentropic

请参阅上面文本的更新。这意味着,您将必须适当地转义那些字符。
jno

By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.