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

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

我尝试使用awk和sed,但我的命令变得混乱。


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

在第8行插入

This is Line 8

进入文件

-i直接修改文件file,不输出到stdout,正如glenn jackman在注释中提到的那样。


awk的答案

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

一个成功的答案

ed file << END
8i
Project_Name=sowstest
.
w
q
END

. 在它自己的行结束输入模式;w写道;q退出。GNU ed有一个wq命令来保存和退出,但旧ed没有。

进一步阅读:https://gnu.org/software/ed/manual/ed_manual.html


对于那些使用非gnu的SunOS的人来说,下面的代码将会有所帮助:

sed '1i\^J
line to add' test.dat > tmp.dat

^J用^V+^J插入 在'1i之后添加换行符。 \必须是该行的最后一个字符。 命令的第二部分必须在第二行中。


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 (change)或s (substitute)命令:

$ 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定义。


Perl的解决方案:

又快又脏:

perl -lpe `打印"Project_Name=sowstest"== 8'文件

-l删除换行符并将其添加回去,消除了“\n”的需要 -p在输入文件上循环,打印每一行 -e以单引号执行代码

美元。是行号

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

Perl -slpe打印$s如果$。== $n'——-n=8 -s="Project_Name=sowstest"文件

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

位置命令参数:

perl -lpe 'BEGIN{$n=shift;$ s =转变};如果$,则打印$s。== $n' 8 "Project_Name=sowstest"文件

环境变量:

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::性病lpe的开始{getopt(“ns”,\ % o)};如果$。== $o{n}'——-n 8 -s "Project_Name=sowstest"文件

Getopt::更长的选项名称

perl -MGetopt::Long -lpe 'BEGIN{GetOptions(\%o,"line=i","string=s")};如果$。== $o{line}' -- --line 8——string "Project_Name=sowstest"文件

Getopt是推荐的标准库解决方案。 对于一行perl脚本来说,这可能有点过分了,但这是可以做到的


OS X / macOS / FreeBSD sed

-i标志在macOS sed和GNU sed上的工作方式不同。

下面是在macOS / OS X上使用它的方法:

sed -i '' '8i\
8 This is Line 8' FILE

更多信息见男子1 sed。


sed -e '8iProject_Name=sowstest' -我开始使用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 ~]# 

sed -i "" -e $'4 a\\\n''Project_Name=sowstest' start

这一行在macOS中工作正常


在Linux中添加2行可以很好地工作。

sed '2s/$/ myalias/' file

谢谢umläute

sed -i "" -e $'4 a\\\n''Project_Name=sowstest' filename

下面的代码在macOS上很有用,可以在4之后添加新行

为了循环我创建了一个文件夹数组,在mac zsh中迭代它们

for foldercc in $foldernames; 

sed -i "" -e $'4 a\\\n''Project_Name=sowstest' $foldercc/filenames;