Regex Perl：替换正则表达式中的字符串重复运算符

在替换正则表达式期间，有没有一种简单的方法可以使用Perl的重复运算符

x

我正在尝试在非常基本的HTML上快速编写一行程序，而不使用模块。本质上，我想根据HTML标记中的标题编号，将带有打开

和关闭

HTML标记的行转换为WIKI标记。所以

原始数据

• 这是一个标题

• 这是标题二

• 这是头三个

\uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu


=这是一个标题=

==这是头二==

==这是一个头三===


一切都与正则表达式本身配合良好，将原始标题标记所需的数字捕获到
$1
变量中。在替换部分，是否有一种方法可以使用该变量创建所需数量的
=
符号（例如，
“=”x$1
）

perl-0777-pe的/（[^运算符不在字符串中插入。您需要
/e
开关将替换内容解释为代码，而不仅仅是字符串：

s/<h(\d)>([^<]*)<\/h\d>/"=" x $1 . $2 . "=" x $1/ge

s/（[^运算符不在字符串中插入。您需要使用
/e
开关将替换内容解释为代码，而不仅仅是字符串：

s/<h(\d)>([^<]*)<\/h\d>/"=" x $1 . $2 . "=" x $1/ge

s/（[^这就是
s///e
的作用：

s/（[^这就是
s///e
的作用：

s/（[^此版本使用{}delimeter来避免转义、a/i和反向引用，例如

<h1>.....</h3> 

。。。。。

不匹配

s{<h(\d)>([^<]*)</h\g1>}{"=" x $1 . " $2 " . "=" x $1}gei;

s{（[^此版本使用{}delimeter来避免转义、a/i和反向引用，例如

<h1>.....</h3> 

。。。。。

不匹配

s{<h(\d)>([^<]*)</h\g1>}{"=" x $1 . " $2 " . "=" x $1}gei;

s{([^谢谢你，看起来你和@choroba都在这个上面！感谢你的快速周转。谢谢你，看起来你和@choroba都在这个上面！感谢你的快速周转。谢谢。这很有道理。我不知道
/s
的变化
我必须刷新我的正则表达式定量配给多一点。真的很感谢你的帮助！谢谢。非常有意义。我不知道
/s
正在更改
我必须再刷新一下我的正则表达式操作。真的很感谢你的帮助！