從extracting the n'th regex match之前的問題開始，我現在需要替換比賽，如果找到了。 我認爲我可以定義提取子程序，並用/e修飾符替換它進行調用。我顯然是錯的（當然，我有一個XY problem）。 use strict;
use warnings;
sub extract_quoted { # à la codaddict
my ($string,
的Perl允許... $a = "fee";
$result = 1 + f($a) ; # invokes f with the argument $a
但不允許，或者說不會做我想做的...... s/((fee)|(fie)|(foe)|(foo))/f($1)/ ; # does not invoke f with the argument $1
期望，最終的結果是實現面向置換的方
我們有很多字符串包含相同的子字符串，從關於檢查日誌或如何聯繫支持的句子到包含公司或產品名稱的類似品牌的字符串。重複導致了我們自己的一些問題（主要是拼寫錯誤或複製/粘貼錯誤），但它也引起了問題，因爲它增加了翻譯者翻譯的文本數量。 我想出瞭解決辦法去是這樣的： public class ExpandingResourceBundleControl extends ResourceBundle.Cont