Supprimer la plage de lignes au-dessus du motif avec sed (ou awk)

J'ai le code suivant qui supprimera les lignes avec le motif bananaet 2 lignes après:

sed '/banana/I,+2 d' file

Jusqu'ici tout va bien! Mais j'en ai besoin pour supprimer 2 lignes avant banana , mais je ne peux pas l'obtenir avec un «signe moins» ou autre (similaire à ce qui grep -v -B2 banana filedevrait faire mais ne le fait pas):

teresaejunior@localhost ~ > LC_ALL=C sed '-2,/banana/I d' file
sed: invalid option -- '2'
teresaejunior@localhost ~ > LC_ALL=C sed '/banana/I,-2 d' file
sed: -e expression #1, char 16: unexpected `,'
teresaejunior@localhost ~ > LC_ALL=C sed '/banana/I,2- d' file
sed: -e expression #1, char 17: unknown command: `-'

Sed ne revient pas en arrière: une fois la ligne traitée, c'est fait. Donc, «trouver une ligne et imprimer les N lignes précédentes» ne fonctionnera pas tel quel, contrairement à «trouver une ligne et imprimer les N lignes suivantes» qui est facile à greffer.

Si le fichier n'est pas trop long, puisque vous semblez être d'accord avec les extensions GNU, vous pouvez utiliser tacpour inverser les lignes du fichier.

tac | sed '/banana/I,+2 d' | tac

Un autre angle d'attaque consiste à maintenir une fenêtre coulissante dans un outil comme awk. Adaptation à partir de Y a-t-il une alternative aux commutateurs -A -B -C de grep (pour imprimer quelques lignes avant et après)? (avertissement: peu testé):

#!/bin/sh
{ "exec" "awk" "-f" "$0" "$@"; } # -*-awk-*-
# The array h contains the history of lines that are eligible for being "before" lines.
# The variable skip contains the number of lines to skip.
skip { --skip }
match($0, pattern) { skip = before + after }
NR > before && !skip { print NR h[NR-before] }
{ delete h[NR-before]; h[NR] = $0 }
END { if (!skip) {for (i=NR-before+1; i<=NR; i++) print h[i]} }

Usage: /path/to/script -v pattern='banana' -v before=2

C'est assez facile avec ex ou vim -e

    vim -e - $file <<@@@
g/banana/.-2,.d
wq
@@@

L'expression se lit comme suit: pour chaque ligne contenant de la banane dans la plage allant de la ligne actuelle -2 à la ligne actuelle, supprimez.

Ce qui est cool, c'est que la plage peut également contenir des recherches en arrière et en avant, par exemple, cela supprimera toutes les sections du fichier commençant par une ligne contenant apple et se terminant par une ligne contenant orange et contenant une ligne avec banane:

    vim -e - $file <<@@@
g/banana/?apple?,/orange/d
wq
@@@

Utilisation de la "fenêtre coulissante" dans perl:

perl -ne 'push @lines, $_;
          splice @lines, 0, 3 if /banana/;
          print shift @lines if @lines > 2
          }{ print @lines;'

Vous pouvez le faire assez simplement avec sed:

printf %s\\n    1 2 3 4match 5match 6 \
                7match 8 9 10 11match |
sed -e'1N;$!N;/\n.*match/!P;D'

Je ne sais pas pourquoi quelqu'un dirait le contraire, mais pour trouver une ligne et imprimer les lignes précédentes sed incorpore la Pprimitive \nrint intégrée qui n'écrit que jusqu'au premier caractère ewline dans l'espace modèle. La Dprimitive elete complémentaire supprime ce même segment d'espace de motif avant de recycler récursivement le script avec ce qui reste. Et pour l'arrondir, il existe une primitive pour ajouter la Nligne d'entrée ext à l'espace de motif après un \ncaractère ewline inséré .

Pour qu'une seule ligne sedsoit tout ce dont vous avez besoin. Vous remplacez simplement matchpar votre expression rationnelle et vous êtes en or. Cela devrait également être une solution très rapide .

Notez également qu'il comptera correctement un matchprécédent immédiatement matchcomme déclencheur de sortie silencieuse pour les deux lignes précédentes et calmera également son impression:

1
7match
8
11match

Pour que cela fonctionne pour un nombre arbitraire de lignes, tout ce que vous avez à faire est d'obtenir une piste.

Alors:

    printf %s\\n     1 2 3 4 5 6 7match     \
                     8match 9match 10match  \
                     11match 12 13 14 15 16 \
                     17 18 19 20match       |
    sed -e:b -e'$!{N;2,5bb' -e\} -e'/\n.*match/!P;D'

1
11match
12
13
14
20match

... supprime les 5 lignes précédant toute correspondance.

En utilisant man 1 ed:

str='
1
2
3
banana
4
5
6
banana
8
9
10
'

# using Bash
cat <<-'EOF' | ed -s <(echo "$str")  | sed -e '1{/^$/d;}' -e '2{/^$/d;}'
H
0i


.
,g/banana/km\
'm-2,'md
,p
q
EOF