替换标识结束字符的多行

Question

我有下面的代码

CREATE TABLE Table1(
        column1 double NOT NULL,
        column2 varchar(60) NULL,
        column3 varchar(60) NULL,
        column4 double NOT NULL,
 CONSTRAINT Index1 PRIMARY KEY CLUSTERED
(
        column2 ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON PRIMARY
) ON PRIMARY

GO
GO

我想替换

 CONSTRAINT Index1 PRIMARY KEY CLUSTERED
(
        column2 ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON PRIMARY
) ON PRIMARY

GO

与

)

您不能假设 GO 是文件的最后一个字符。 Go 之后可以有另一个表脚本。 如何使用单个 sed 或 awk 做到这一点。

Answer 1

更新：

您甚至可以使用以下sed 命令替换CONSTRAINT 块之前的最后一个,：

sed -r '/,/{N;/CONSTRAINT/{:a;N;/GO/!ba;s/([^,]+).*/\1\n)/};/CONSTRAINT/!n}' input.sql

让我把它解释为一个多行脚本：

# Search for a comma
/,/ {
  # If a command was found slurp in the next line
  # and append it to the current line in pattern buffer
  N
  # If the pattern buffer does not contain the word CONSTRAINT
  # print the pattern buffer and go on with the next line of input
  # meaning start searching for a comma
  /CONSTRAINT/! n

  # If the pattern CONSTRAINT was found we loop until we find the 
  # word GO
  /CONSTRAINT/ {
    # Define a start label for the loop 
    :a
    # Append the next line of input to the pattern buffer
    N
    # If GO is still not found in the pattern buffern
    # step to the start label of the loop
    /GO/! ba

    # The loop was exited meaning the pattern GO was found.
    # We keep the first line of the pattern buffer - without
    # the comma at the end and replace everything else by a )
    s/([^,]+).*/\1\n)/
  }
}

您可以将上面的多行脚本保存在一个文件中并使用它执行它

sed -rf script.sed input.sql

---

您可以使用以下sed 命令：

sed '/CONSTRAINT/{:a;N;/GO/!ba;s/.*/)/}' input.sql

该模式搜索包含/CONSTRAINT/ 的行。如果找到该模式，则开始在{ } 之间包裹一个命令块。在块中，我们首先定义一个标签a 到:a。我们通过N 获得下一行输入并将其附加到模式缓冲区。除非我们找到模式/GO/!，否则我们将使用分支命令b 在标签a 处继续。如果找到/GO/ 模式，我们只需将缓冲区替换为)。

---

另一种方法是使用 FredPhil 建议的范围：

sed '/CONSTRAINT/,/GO/{s/GO/)/;te;d;:e}'

Answer 2

这可能看起来很吓人，但稍微解释一下就不难理解了：

SED_DELIM=$(echo -en "\001")
START=' CONSTRAINT Index1 PRIMARY KEY CLUSTERED'
END='GO' 
sed -n $'\x5c'"${SED_DELIM}${START}${SED_DELIM},"$'\x5c'"${SED_DELIM}${END}${SED_DELIM}{s${SED_DELIM}GO${SED_DELIM})${SED_DELIM};t a;d;:a;};p" test2.txt

sed有以下形式你可能比较熟悉：
sed /regex1/,/regex2/{commands}

首先它使用 SOH 不可打印作为分隔符\001
为 sed 多行匹配设置 START 和 END 标签
然后执行 sed 命令：
-n 默认不打印
$'\x5c' 是一个 Bash 字符串文字，对应于反斜杠 \
反斜杠对于在多行范围匹配中转义不可打印的分隔符是必需的。
{s${SED_DELIM}GO${SED_DELIM})${SED_DELIM};t a;d;:a;};p:
s${SED_DELIM}GO${SED_DELIM})${SED_DELIM} 将匹配 GO 的行替换为 )
t a; 如果存在在前面的语句中成功替换然后分支到:a 标签
d 如果没有替换然后删除该行
p 打印命令之后的任何结果 分支到

在发布之前我没有看到他们的答案 - 这个答案与 FredPhil/hek2mgl 相同 - 除了通过这种方式你有一个机制可以在 LHS 上更加动态，因为你可以将分隔符更改为一个字符出现在数据集中的可能性要小得多。

Answer 3

对于多字符 RS 使用 GNU awk 并假设您想去掉“CONSTRAINT”之前的逗号：

$ cat tst.awk
BEGIN{ RS="^$"; ORS="" }
{
    gsub(/\<GO\>/,"\034")
    gsub(/,\s*CONSTRAINT[^\034]+\034/,")")
    gsub(/\034/,"GO")
    print
}
$ gawk -f tst.awk file
CREATE TABLE Table1(
        column1 double NOT NULL,
        column2 varchar(60) NULL,
        column3 varchar(60) NULL,
        column4 double NOT NULL)
GO

上述方法通过将每个独立的“GO”替换为不太可能出现在您的输入中的控制字符（在这种情况下，我使用与默认 SUBSEP 相同的值），因此我们可以在否定字符中使用该字符中间的列表 gsub() 以创建一个以“CONSTRAINT”之后的第一个“GO”结尾的正则表达式。这是在 awk 中进行“非贪婪”匹配的一种方法。

如果没有你知道的字符不能出现在你的输入中，你可以像这样创建一个：

$ cat tst.awk
BEGIN{ RS="^$"; ORS="" }
{
    gsub(/a/,"aA"); gsub(/b/,"aB"); gsub(/\<GO\>/,"b")
    gsub(/,\s*CONSTRAINT[^b]+b/,")")
    gsub(/b/,"GO"); gsub(/aB/,"b"); gsub(/aA/,"a")
    print
}
$ 
$ gawk -f tst.awk file
CREATE TABLE Table1(
        column1 double NOT NULL,
        column2 varchar(60) NULL,
        column3 varchar(60) NULL,
        column4 double NOT NULL)
GO

上面最初将所有“a”转换为“aA”，将“b”转换为“aB”，这样

1. 记录中不再有任何“b”，并且
2. 由于所有原始的“a”现在后面都有一个“A”，因此唯一出现的 “aB”表示“bs”最初所在的位置

这意味着我们现在可以将所有“GO”转换为“b”，就像我们在上面的第一个脚本中将它们转换为“\034”一样。然后我们执行主 gsub()，然后展开我们的初始 gsub()。

gsub()ing 的想法是创建以前不存在的字符，使用这些字符，然后展开初始的 gsub()s 是一个非常有用的学习和记忆习语，例如有关其他应用程序，请参阅 https://stackoverflow.com/a/13062682/1745001。

一步一步地看它工作：

$ cat file                                                                                                   
foo bar Hello World World able bodies

$ awk '{gsub(/a/,"aA")}1' file                                                                               
foo baAr Hello World World aAble bodies

$ awk '{gsub(/a/,"aA"); gsub(/b/,"aB")}1' file                                                               
foo aBaAr Hello World World aAaBle aBodies

$ awk '{gsub(/a/,"aA"); gsub(/b/,"aB"); gsub(/World/,"b")}1' file                                            
foo aBaAr Hello b b aAaBle aBodies

$ awk '{gsub(/a/,"aA"); gsub(/b/,"aB"); gsub(/World/,"b"); gsub(/Hello[^b]+b/,"We Are The")}1' file                         
foo aBaAr We Are The b aAaBle aBodies

$ awk '{gsub(/a/,"aA"); gsub(/b/,"aB"); gsub(/World/,"b"); gsub(/Hello[^b]+b/,"We Are The"); gsub(/b/,"World")}1' file 
foo aBaAr We Are The World aAaBle aBodies

$ awk '{gsub(/a/,"aA"); gsub(/b/,"aB"); gsub(/World/,"b"); gsub(/Hello[^b]+b/,"We Are The"); gsub(/b/,"World"); gsub(/aB/,"b")}1' file
foo baAr We Are The World aAble bodies

$ awk '{gsub(/a/,"aA"); gsub(/b/,"aB"); gsub(/World/,"b"); gsub(/Hello[^b]+b/,"We Are The"); gsub(/b/,"World"); gsub(/aB/,"b"); ; gsub(/aA/,"a")}1' file
foo bar We Are The World able bodies