从正则表达式中的上一行返回值

Question

我希望通过正则表达式返回上一行中的特定组。

假设我有以下信息，目标是根据下一行的微分提取90的值。

QTY+66:90:PCE
SCC+2
DTM+45:20200416:15
QTY+66:60:PCE
SCC+3
DTM+35:20210614:2

如果我要追踪值 90，我必须寻找 SCC+2 标记，如果我要寻找值 60，它将是SCC+3 标签。

我在尝试返回值 90 (?<=^QTY\+66:)(\d+)(.*\n.*SCC\+2.*) 时走了这么远，但它看起来很复杂，我无法仅提取第 1 组。这是指向 regex101 的链接。我将 R 用于实际应用程序。感谢您的帮助！

Answer 1

你可以使用

(?<=:)\d+(?=[^\d\r\n]*[\r\n]+.*SCC\+2)

请参阅regex demo。 详情：

• (?<=:) - : 必须紧邻当前位置的左侧
• \d+ - 一位或多位数字
• (?=[^\d\r\n]*[\r\n]+.*SCC\+2) - 紧靠右边，一定有
• [^\d\r\n]* - 除数字、CR 和 LF 以外的任何零个或多个字符
• [\r\n]+ - 一个或多个 CR 或 LF 字符
• .*SCC\+2 - 一行中的任何文本，直到出现 SCC+2 为止。

在 R 中，你可以使用

library(stringr)
str_extract(vec, "(?<=:)\\d+(?=[^\\d\r\n]*[\r\n]+.*SCC\\+2)")

以及sub 的几个基本 R 方法：

sub(".*?\\+\\d+:(\\d+)[^\r\n]*[\r\n]+[^\r\n]*SCC\\+2.*", "\\1", vec)
sub("(?s).*?\\+\\d+:(\\d+)(?-s).*\\R.*SCC\\+2(?s).*", "\\1", vec, perl=TRUE)

请参阅 regex 1 demo 和 regex 2 demo。

见R demo online：

vec <- "QTY+66:90:PCE\nSCC+2\nDTM+45:20200416:15\nQTY+66:60:PCE\nSCC+3\nDTM+35:20210614:2"
sub(".*?\\+\\d+:(\\d+)[^\r\n]*[\r\n]+[^\r\n]*SCC\\+2.*", "\\1", vec)
sub("(?s).*?\\+\\d+:(\\d+)(?-s).*\\R.*SCC\\+2(?s).*", "\\1", vec, perl=TRUE)
library(stringr)
str_extract(vec, "(?<=:)\\d+(?=[^\\d\r\n]*[\r\n]+.*SCC\\+2)")

全部收益[1] "90"。