对于初学者来说，这里有一个简单的take，它在我对特定发布文本的测试中起作用

s{<div\s+ class="(\S+) (.*?) </div>}{<!-- $1 --> $2 <!-- $1 end -->}sxg;

字符串
修改器为：s，这样.也匹配一个换行符（通常它不匹配），x，这样文字空间被忽略，这有助于可读性，g，这样它就可以通过字符串，匹配和替换。
我建议使用文件中的程序，而不是命令行程序（“一行程序”），但由于这是在这里的问题中特别要求的

perl -0777 -wpe'
    s{<div\s+ class="(\S+) (.*?) </div>}{<!-- $1 --> $2 <!-- $1 end -->}sxg'

型
-0777开关使其将整个文件读入$_变量，这是Perl中许多事情的默认值--在本例中是regex的s{}{}运算符。
在一个更大、更结构化的程序中，你可能会在变量中有开始和结束模式，

s{$pbeg (.*?) $pend}{...}sxg

型
在这种情况下，

my $pbeg = qr{<div\s+ class="(\S+)};
my $pend = qr{</div>}

型
然而，如果这些模式变得复杂，

这可能对你有用（GNU sed）：

sed -E '/^<div class="([^ "]*).*/{
          s//<!-- \1 start -->/;h;:a;n;/^<\/div>$/!ba;g;s/\bstart/end/}' file

字符串
匹配起始div。
将该行处理为所需的格式并制作副本。
打印/获取下一行，直到div结束。
将该行替换为副本，并将start替换为end，然后打印结果。
重复.

在第一个例子中使用GNU awk的第三个arg to match（）和强类型regexp常量：

$ cat defs1.awk
BEGIN {
    begReg = @/<div\s+class="([^" ]+)/
    endReg = @/<\/div>/
    begFmt = "<!-- %s start -->"
    endFmt = "<!-- %s end -->"
}

字符串

$ cat common.awk
match($0,begReg,a) {
    key = a[1]
    $0 = sprintf(begFmt,key)
}
match($0,endReg,a) {
    $0 = sprintf(endFmt,key)
}
{ print }

型

$ awk -f defs1.awk -f common.awk file1
Some text
<!-- firstClass start -->
    Some random stuff
<!-- firstClass end -->
Random Text
<!-- thirdClass start -->
    Some random stuff
    < is something
    < but not /> This
<!-- thirdClass end -->
<!-- fourthClass start -->
    Some random stuff
<!-- fourthClass end -->
Final Text

型
对于你的第二个例子，我们只需要一个新的定义文件，但可以重用上面的common.awk：

$ cat defs2.awk
BEGIN {
    begReg = @/PATTERN "([^" ]+)/
    endReg = @/END PATTERN/
    begFmt = "NEW PATTERN - %s"
    endFmt = "END NEW PATTERN - %s"
}

型

$ awk -f defs2.awk -f common.awk file2
Some random text before my pattern
NEW PATTERN - info
  random stuffs
END NEW PATTERN - info
Some random stuff after pattern

型
注意，我们只是在2个defs*.awk文件的BEGIN部分中定义了所需的输入regexp和输出格式，我们没有更改common.awk中的其余代码。所有这一切都取决于您可以在regexp中定义第一个捕获组，该捕获组与您的开始行匹配，以包含您希望在开始行和结束行中保留/打印的关键信息。
对于endReg匹配，您并不严格需要match()，但我使用它是为了防止您将来需要调整它以用于其他结尾格式。
只需将awk更改为awk -i inplace，即可执行与所有其他工具相同的伪原地编辑。

下面是一个简单的Awk脚本，它提取class="之后的第一个标记，并在替换文本中使用它。

awk '/<div class="/ { sub(/.*<div class="/, ""); sub(/[" ].*/, "");
    class=$0; print "<--", class, "start -->"; next }
  /<\/div>/ { print "<--", class", "end -->"; class=""; next }
  1' file >new

字符串
在正则表达式匹配方面，这里没有什么“多行”，只是一个简单的工具，用于记住行之间的一些状态。Awk仍然一次检查一行（尽管如果需要，也不难改变;参见RS）。