Skip to main content
Unix & Linux

Return to Answer

added 179 characters in body
Source Link
guest_7
guest_7
  • 5.8k
  • 1
  • 8
  • 13

Using GNU sed we can perform the task by storing the count as dots . in the hold space.

sed -e '
  /^line 1$/,/^line 1$/{//!b
    x;s/^$/./;x;t
    :a;n;s/^line 3$/REPLACED/;ba
  }
' file

Another possibility without using the range operator and with extended regex mode in GNU sed. Here the newline \n function as counter, stored in the hold space.

sed -Ee '
  /^line 1$/H
  x;s/^(\n{1,2}).*/\1/;x
  /^line 3$/G
  /\n.{2}/c REPLACED
  s/\n//g
' file

Perl can do the same in a similar fashion

perl -lpe '
  s/^line 3$/$a?"REPLACED":$&/e
           unless
  m?^line 1$? ... /^line 1$(?{$a++})/;
' file

Using awk, we can nicely combine regexes with variables and incrementing by one

awk '
1 < ( k += /^line 1$/ ) &&
sub(/^line 3$/,"REPLACED") ||
1' file

Using GNU sed we can perform the task by storing the count as dots . in the hold space.

sed -e '
  /^line 1$/,/^line 1$/{//!b
    x;s/^$/./;x;t
    :a;n;s/^line 3$/REPLACED/;ba
  }
' file

Another possibility without using the range operator and with extended regex mode in GNU sed. Here the newline \n function as counter, stored in the hold space.

sed -Ee '
  /^line 1$/H
  x;s/^(\n{1,2}).*/\1/;x
  /^line 3$/G
  /\n.{2}/c REPLACED
  s/\n//g
' file

Perl can do the same in a similar fashion

perl -lpe '
  s/^line 3$/$a?"REPLACED":$&/e
           unless
  m?^line 1$? ... /^line 1$(?{$a++})/;
' file

Using GNU sed we can perform the task by storing the count as dots . in the hold space.

sed -e '
  /^line 1$/,/^line 1$/{//!b
    x;s/^$/./;x;t
    :a;n;s/^line 3$/REPLACED/;ba
  }
' file

Another possibility without using the range operator and with extended regex mode in GNU sed. Here the newline \n function as counter, stored in the hold space.

sed -Ee '
  /^line 1$/H
  x;s/^(\n{1,2}).*/\1/;x
  /^line 3$/G
  /\n.{2}/c REPLACED
  s/\n//g
' file

Perl can do the same in a similar fashion

perl -lpe '
  s/^line 3$/$a?"REPLACED":$&/e
           unless
  m?^line 1$? ... /^line 1$(?{$a++})/;
' file

Using awk, we can nicely combine regexes with variables and incrementing by one

awk '
1 < ( k += /^line 1$/ ) &&
sub(/^line 3$/,"REPLACED") ||
1' file
deleted 7 characters in body
Source Link
guest_7
guest_7
  • 5.8k
  • 1
  • 8
  • 13

Using GNU sed we can perform the task by storing the count as dots . in the hold space.

sed -e '
  /^line 1$/,/^line 1$/{;//!b
    x;/./!{sx;s/$^$/./;x;b;};x;:n;x;t
    n;s:a;n;s/^line 3$/REPLACED/;bn;ba
  }
' file

AnotHerAnother possibility without using the range operator and with extended regex mode in GNU sed. Here the newline \n function as counter, stored in the hold space.

sed -Ee '
  /^line 1$/H
  x;s/^(\n{1,2}).*/\1/;x
  /^line 3$/G
  /\n.{2}/c REPLACED
  s/\n//g
' file

Perl can do the same in a similar fashion

perl -lpe '
  s/^line 3$/$a?"REPLACED":$&/e
           unless
  m?^line 1$? ... /^line 1$(?{$a++})/;
' file

Using GNU sed we can perform the task by storing the count as dots . in the hold space.

sed -e '
  /^line 1$/,/^line 1$/{;//!b
    x;/./!{s/$/./;x;b;};x;:n
    n;s/^line 3$/REPLACED/;bn
  }
' file

AnotHer possibility without using the range operator and with extended regex mode in GNU sed. Here the newline \n function as counter, stored in the hold space.

sed -Ee '
  /^line 1$/H
  x;s/^(\n{1,2}).*/\1/;x
  /^line 3$/G
  /\n.{2}/c REPLACED
  s/\n//g
' file

Perl can do the same in a similar fashion

perl -lpe '
  s/^line 3$/$a?"REPLACED":$&/e
           unless
  m?^line 1$? ... /^line 1$(?{$a++})/;
' file

Using GNU sed we can perform the task by storing the count as dots . in the hold space.

sed -e '
  /^line 1$/,/^line 1$/{//!b
    x;s/^$/./;x;t
    :a;n;s/^line 3$/REPLACED/;ba
  }
' file

Another possibility without using the range operator and with extended regex mode in GNU sed. Here the newline \n function as counter, stored in the hold space.

sed -Ee '
  /^line 1$/H
  x;s/^(\n{1,2}).*/\1/;x
  /^line 3$/G
  /\n.{2}/c REPLACED
  s/\n//g
' file

Perl can do the same in a similar fashion

perl -lpe '
  s/^line 3$/$a?"REPLACED":$&/e
           unless
  m?^line 1$? ... /^line 1$(?{$a++})/;
' file
Source Link
guest_7
guest_7
  • 5.8k
  • 1
  • 8
  • 13

Using GNU sed we can perform the task by storing the count as dots . in the hold space.

sed -e '
  /^line 1$/,/^line 1$/{;//!b
    x;/./!{s/$/./;x;b;};x;:n
    n;s/^line 3$/REPLACED/;bn
  }
' file

AnotHer possibility without using the range operator and with extended regex mode in GNU sed. Here the newline \n function as counter, stored in the hold space.

sed -Ee '
  /^line 1$/H
  x;s/^(\n{1,2}).*/\1/;x
  /^line 3$/G
  /\n.{2}/c REPLACED
  s/\n//g
' file

Perl can do the same in a similar fashion

perl -lpe '
  s/^line 3$/$a?"REPLACED":$&/e
           unless
  m?^line 1$? ... /^line 1$(?{$a++})/;
' file