问题标签 [substitution]

小例子：

perl -e '$s="aaabbcc";$c=()=$s=~/a/g;print"$c\n$s\n"'(m//g) 输出

而perl -e '$s="aaabbcc";$c=()=$s=~s/a/x/g;print"$c\n$s\n"'(s///g) 输出

我想同时做这两件事而不必先匹配：替换并知道替换的数量。显然 as///g 不会返回标量上下文中的替换次数——不像 m//g 对匹配项所做的那样。这可能吗？如果是，如何？

perlre、perlvar 和 perlop 没有提供任何帮助（或者我只是找不到它）。

而我们在 Substitution 控件中使用的方法应该返回字符串，那么如何在应该呈现服务器端的服务器控件上使用 web 表单中的甜甜圈缓存呢？
例如 Loginview 控件？

我想创建一个函数，如果它失败将重试表达式。这是我的工作版本：

如果我删除suppressWarnings()上面的函数，那么每次递归调用都会收到一组警告。有谁知道我做错了什么会导致这种情况？

这是一个可以重复运行的示例：

我将如何去取一个字符串：</p>

并用数字代替这些值1, 2, 3, 4？

相应地，我将如何执行相同的操作但在列表中？

SP 2010 的功能定义中有一个新的语法元素{$ListId:Lists/ListName}。显然它应该用 traget 站点上列表的 GUID 替换它。这解决了在创建列表之前您不知道 GUID 并且必须使用功能接收器来定义需要 GUID 的元素的问题。

还有其他这样的替代吗？有可用的列表吗？

谢谢！

有没有办法在替换中使用变量作为修饰符？

我需要使用哈希数组来使用不同的修饰符进行批量搜索替换。

可能重复：
如何在 Perl 替换运算符的替换端使用变量？

我想做类似的事情

我希望它返回，1234但在这种情况下它返回\1。即我希望它等同于有s/$match/\1/g没有人知道如何做到这一点？

我有几个文本文件，它们曾经是数据库中的表，现在已被反汇编。我正在尝试重新组装它们，一旦我将它们变成可用的形式，这将很容易。第一个文件“keys.text”只是一个标签列表，格式不一致。喜欢：

它总是字母、[空格]、数字、[空格]，有时还有符号。与这些键匹配的文本文件是相同的，然后是一行文本，也由空格分隔或定界。

我在下面的代码中尝试做的是将“keys.text”中的键与 .txt 文件中的相同键匹配，并在键和文本之间放置一个制表符。我确定我忽略了一些非常基本的东西，但是我得到的结果看起来与源 .txt 文件相同。

提前感谢任何线索或帮助！

编辑：为了澄清，结果也应该保留键中的符号，如果有的话。所以他们看起来像：

有没有办法用正则表达式内联替换文本，而不是从变量中获取文本并将其存储在变量中？

我是 perl 初学者。我经常发现自己在写作

我真的很想写的地方

或类似的，而不是使用临时变量和三行。

有没有办法做到这一点？显然，当正则表达式足够复杂时，将其拆分出来以便更好地解释是有意义的，但是当它只是s/\s//g用额外的变量使代码混乱时感觉不对。

我的目标是将尾随的所有实例 - 替换为标签括号内的尾随 + 。让我们假设要替换的行如下所示：

然后应该看起来像

首先我尝试了这个表达式：

这产生了这个输出：

g 选项确实会导致每行不止一次替换，但仅适用于每个标签括号的第一个实例（并且仅当两个圆括号都包含问号时）。

为了缩小问题范围，我尝试实现忽略标签的替换。表达方式

确实导致了预期的结果

当然，这也将替换标签括号之外的内容。

那么我的第一个表达式有什么问题，我怎样才能实现在标签括号内完全替换的目标？