主页 / unix / 问题 / 762047
Accepted
RonJohn
Asked: 2023-11-22 06:39:49 +0800 CST

查找两个模式之间的所有线条，第二个模式独有的？

  • 772

考虑一下我有下面列出的文件。我需要选择正则表达式模式的每个实例Word A到正则表达式模式之前的Word D所有行。

Word A
Word B
Word C
Word D
Word E
Word F
Word G
Word A
Word H
Word I
Word D
Word J
Word A
Word K
Word D
Word L
Word M
Word A
Word D

A请注意和之间的可变行数D。有时，D是下一行。这就是我需要的输出：

Word A
Word B
Word C
Word A
Word H
Word I
Word A
Word K
Word A

可以使用 awk、perl、python 或 sed 完成。只要安装在文件所在的 RHEL6 服务器上就没有关系。

awk

6 个回答

  1. 使用 AWK：

    awk '/Word A/ { m = 1 } /Word D/ { m = 0 } m'
    • 4

  2. 这是一个awk解决方案

    awk \
  -vstart='Word A' \
  -vend='Word D' \
  '{
     if ($0==end  ) {flag=0;next};
     if ($0==start) {flag=1};
     if (flag==1) {print $0};
  }'

    正则表达式处理只需稍作更改

    awk \
  -vstart='Word[ ]A' \
  -vend='Word[ ]D' \
  '{
     if ($0 ~ end  ) {flag=0;next};
     if ($0 ~ start) {flag=1};
     if (flag==1) {print $0};
  }'
    • 2
  3. Best Answer

    仅限 GNU sed：

    sed '/Word A/!d;:1;n;/Word D/d;b1' file

    在更复杂的情况下 - 无效块：

    sed -n '/Word A/!b;:1;/Word A/h;n;/Word D/{g;p;d};H;b1' file
    • 1

  4. TXR Lisp 的awk宏直接支持这一点；(range)运算rng 符有九种变体，用于以各种方式从范围的开头或结尾排除记录：

    $ txr -e '(awk ((rng- #/Word A/ #/Word D/)))' data
Word A
Word B
Word C
Word A
Word H
Word I
Word A
Word K
Word A

    此外，与 Awk 的范围运算符不同，它与其他运算符结合使用。例如，假设您想要打印同时位于footobar范围和startto范围内的记录end，无论这些类型的范围在数据中如何重叠：

    (awk ((and (rng #/foo/ #/bar/)
           (rng #/start/ #/end/))))
    • 1

  5. 使用awk：

    $ awk '
    $0 == "Word A" { f=1; rec=$0; next }
    { if ( $0 == "Word D" ) { print rec; f=0 } }
    f{rec = rec ORS $0}'

# For regex pattern
$ awk '          
    (/Word A/ && !/Word D/) { f=1; rec=$0; next }
    (/Word D/ && rec){ print rec; f=0; rec="" }
    f{rec = rec ORS $0}
'

    如果每次都Word D匹配Word A，则可以使用以下命令。

    $ awk '/Word A/,/Word D/ { if (!/Word D/) print }'
    • 0

  6. sed让我们对线路规格进行算术：

    sed -n -e '/Word A/,/Word D/-1p' The_File

    读man sed。

    • -2

相关问题