目的

データ内の特定行と、その上２行を消したい。

具体的に考えてみよう。

下記のようなデータファイル before.dat を考える。
そこには、森（探索先）で出会った生き物（対象）の有無が記録されている。出会えなかった生き物の下には ”nodata” と書いている。

before.dat

探索先　森
対象 カブトムシ
探索先　森
対象 金魚
nodata
探索先 森
対象 きつね
探索先　森
対象　ネッシー
nodata

このデータから、出会えた生き物だけのデータが記載されたデータファイル after.data を作りたい。

after.data

探索先　森
対象 カブトムシ
探索先 森
対象 きつね

さて、どうしよう？

方法

“nodata” と書かれた行と、その上２行を消せば良いだろう。

使うのはBashシェルスクリプト。
ワイが考えた手順を示そう。以下の４ステップだ。

各行を配列に収納
その配列の中から、要素 "nodata" の添字を見つける。
要素 "nodata" の添字を番号 i とすると、添字 i, i-1, i-2 の要素を削除。
要素を削り終わった後の配列を行に戻す。

以上。
まずは、結果のシェルスクリプトextract.sh を下に示す。
その次にスクリプトの書き方を解説する。結果を読んでチンプンカンプンだった人は解説を読んでね。

結果

extract.sh

# !/bin/bash
### ステップ
# 1 各行を配列に収納。
# 2 その配列の中から、要素 "nodata" の添字を見つける。
# 3 要素 "nodata" の添字を番号 j とすると、添字 j, j-1, j-2 の要素を配列から削除。
# 4　要素を削り終わった後の配列を、行に戻す。

# 型宣言。変数ｊを数値（integer）用に定義する。ついでに１を代入。
declare -i j=1
# while read line の返戻値がfalseのときでも、空行じゃない場合は処理するようなOR文を入れる。
while read line || [ -n "${line}" ];
do
    #ステップ１ 各行を配列に収納。
    array[$j]="$line"
    #ステップ２ 配列の中から、要素 "nodata" の添字を見つける。
    if [ "${array[$j]}" = "nodata" ]; then
        #ステップ３ 要素 "nodata" の添字を番号 j とすると、添字 j, j-1, j-2 の要素を配列から削除。
        unset array[$j]
        unset array[$j-1]
        unset array[$j-2]
    fi

    j+=1

done < <(cat before.dat)

# ステップ４　要素を削り終わった後の配列を、行に戻す。
IFS=$'\n'
echo "${array[*]}" >> after.dat

# @tama2ka

詳しい解説

cat コマンドでファイルの中身を標準出力として出力する。それをパイプ｜で while に渡せば行けそう。

extract.sh

# !/bin/bash

# 型宣言。変数ｊを数値（integer）用に定義する。ついでに１を代入。
declare -i j=1
cat before.dat | while read line
do
    #ステップ１ 各行を配列に収納。
    array[$j]="$line"
    echo "${array[$j]}"
done

出力結果

探索先 森
対象 カブトムシ
探索先 森
対象 金魚
nodata
探索先 森
対象 きつね
探索先 森
対象 ネッシー

あれ？最後の行なくね？
ということで、下記のように修正。（参考）

extract.sh

# !/bin/bash

# 型宣言。変数ｊを数値（integer）用に定義する。ついでに１を代入。
declare -i j=1
cat before.dat | while read line || [ -n "${line}" ];
do
    #ステップ１ 各行を配列に収納。
    array[$j]="$line"
    echo "${array[$j]}"
done

上手くいったので、配列の中のnodataを探す。そいつと、そいつの前２つを消す。

extract.sh

# !/bin/bash

# 型宣言。変数ｊを数値（integer）用に定義する。ついでに１を代入。
declare -i j=1
cat before.dat | while read line
do
    #ステップ１ 各行を配列に収納。
    array[$j]="$line"
    #ステップ２ 配列の中から、要素 "nodata" の添字を見つける。
    if [ "${array[$j]}" = "nodata" ]; then
         #ステップ３ 要素 "nodata" の添字を番号 j とすると、添字 j, j-1, j-2 の要素を配列から削除。
         unset array[$j]
         unset array[$j-1]
         unset array[$j-2]
     fi
     
     j+=1

done

不要な要素を配列から削除したので、行に戻そう！

extract.sh

# !/bin/bash

# 型宣言。変数ｊを数値（integer）用に定義する。ついでに１を代入。
declare -i j=1
cat before.dat | while read line
do
    #ステップ１ 各行を配列に収納。
    array[$j]="$line"
    #ステップ２ 配列の中から、要素 "nodata" の添字を見つける。
    if [ "${array[$j]}" = "nodata" ]; then
         #ステップ３ 要素 "nodata" の添字を番号 j とすると、添字 j, j-1, j-2 の要素を配列から削除。
         unset array[$j]
         unset array[$j-1]
         unset array[$j-2]
     fi
     
     j+=1

done

# ステップ４　要素を削り終わった後の配列を、行に戻す。
IFS=$'\n'
echo "${array[*]}" >> after.dat

上手くいったと思ったら、最後の行の ${array[*]} に何も入っていないじゃないか！！
while の中の array[$j] の情報が、while の外に引き継がれていない。
そこで、引き継がれるように、while への情報の渡し方を変更。cat は使わず、下記のように done の後ろに持っていく。（参考）

extract.sh

# !/bin/bash

# 型宣言。変数ｊを数値（integer）用に定義する。ついでに１を代入。
declare -i j=1
while read line || [ -n "${line}" ];
do
    #ステップ１ 各行を配列に収納。
    array[$j]="$line"
    #ステップ２ 配列の中から、要素 "nodata" の添字を見つける。
    if [ "${array[$j]}" = "nodata" ]; then
        #ステップ３ 要素 "nodata" の添字を番号 j とすると、添字 j, j-1, j-2 の要素を配列から削除。
        unset array[$j]
        unset array[$j-1]
        unset array[$j-2]
    fi

    j+=1

done < <(cat before.dat)

# ステップ４　要素を削り終わった後の配列を、行に戻す。
IFS=$'\n'
echo "${array[*]}" >> after.dat

完成！！