[unix] sed 또는 awk : 패턴에 따라 n 줄 삭제

간단한 awk솔루션 :

일치하는 줄을 찾는 데 사용할 정규식이 쉘 변수에 저장되고 $regex건너 뛸 줄 수라고 가정합니다 $count.

일치하는 줄 도 건너 뛰어야 하는 경우 ( $count + 1줄 건너 뛰기) :

... | awk -v regex="$regex" -v count="$count" \
  '$0 ~ regex { skip=count; next } --skip >= 0 { next } 1'

는 IF 일치하는 라인은해야 하지 건너 뛸 수 ( $count선 후 경기는 건너 뜁니다) :

... | awk -v regex="$regex" -v count="$count" \
  '$0 ~ regex { skip=count; print; next } --skip >= 0 { next } 1'

설명:

• -v regex="$regex" -v count="$count"같은 이름의 쉘 변수를 awk기반으로 변수를 정의 합니다 .
• $0 ~ regex 관심 라인과 일치
  • { skip=count; next }건너 뛰기 횟수를 초기화하고 다음 줄로 진행하여 효과적으로 일치하는 줄을 건너 뜁니다. 두 번째 솔루션에서는 print이전 next이 건너 뛰지 않도록 합니다.
  • --skip >= 0 건너 뛰기 횟수를 줄이고 (여전히)> = 0 인 경우 조치를 취합니다. 이는 당면한 줄을 건너 뛰어야 함을 의미합니다.
  • { next } 다음 줄로 진행하여 효과적으로 현재 줄을 건너 뜁니다.
• 1일반적으로 사용되는 속기입니다 { print }. 즉, 현재 행이 단순히 인쇄됩니다.
  • 일치하지 않고 건너 뛰지 않은 줄만이 명령에 도달합니다.
  • ^{그 이유 1에 해당되고 { print }그는 인 1정의로 항상 (블록) 연관된 동작이 무조건 실행되도록하는 수단은, 참으로 평가하는 부울 패턴으로 해석된다. 이 경우 연관된 조치 가 없으므로awk 기본적으로 행 을 인쇄 합니다.}

답변

cat <<! >pattern_number.txt
> 5 3
> 10 1
> 15 5
> !
sed 's|\(\S*\) \(\S*\)|/\1/,+\2{//!d}|' pattern_number.txt |
sed -f - <(seq 21)
1
2
3
4
5
9
10
12
13
14
15
21

$ cat delete_5lines.txt
1
2
3
4
5 hello
6
7
8
9
10
11 hai
$ perl -ne ' BEGIN{$y=1} $y=$.  if /hello/ ; print if $y==1 or $.-$y > 5 ' delete_5lines.txt
1
2
3
4
11 hai
$

awk -v n=5 '
    NR == FNR {pattern[$0]; next}
    {
        for (patt in pattern) {
            if ($0 ~ patt) {
                print # remove if you want to exclude a matched line
                for (i=0; i<n; i++) getline
                next
            }
        }
        print
    }
' file.with.patterns -