web-dev-qa-db-ja.com

sedまたはawkを使用して特定の行番号に行を挿入します

8行目にテキストを挿入するために別のスクリプトで変更する必要があるスクリプトファイルがあります。

挿入する文字列:Project_Name=sowsteststartというファイルに。

Awkとsedを使用しようとしましたが、コマンドが文字化けしています。

123
ashok
sed -i '8i8 This is Line 8' FILE

8行目に挿入

8 This is Line 8

ファイルFILEへ

-iはglenn jackmanのコメントで述べられているように、ファイルFILEに直接変更を行い、stdoutには出力しません。

203
user unknown

ed回答

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

26
glenn jackman

awkの答え

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

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で定義されています。

14
Lri

OS X/macOS sedname__

-iフラグは、macOS sedname__での動作がGNU sedname__とは異なります。

MacOS/OS Xで使用する方法は次のとおりです。

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

詳細については、man 1 sedを参照してください。

12

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は、すべての環境変数を含むハッシュです

引数を解析してハッシュ%oにする:

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

Getopt :: Longおよび長いオプション名

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は、推奨される標準ライブラリソリューションです。
これは、1行のPerlスクリプトではやり過ぎかもしれませんが、実行できます

5
Chris Koknat

GNU以外のSunOSを使用している場合は、次のコードが役立ちます。

sed '1i\^J
line to add' test.dat > tmp.dat
  • ^ Jは^ V + ^ Jで挿入されます
  • '1iの後に改行を追加します。
  • \は行の最後の文字でなければなりません。
  • コマンドの2番目の部分は2行目になければなりません。
5
Nasri Najib

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

サンプル実行:

[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
jno