我的Perl脚本中有以下行：
s/\b(\w+)\b/ $replaces{$1} ? $replaces{$1} : $1 /g;
我想找到字符串中的所有单词,如果单词在已知单词的数组中,则替换它,否则保留它(理想情况下我想在匹配上执行任意操作,而不仅仅是三元运算符).
为此,我尝试使用三元运算符. Perl对待？和：作为文字符号,只使用变量(如果已定义)将它们连接起来.
如何让Perl处理？：在replace中作为三元运算符？
P.S：我知道我可以在下一行代码中对匹配执行操作,但为了清晰起见,我想保留一个衬里.
解决方法
你需要’e'(执行)限定符：
s/\b(\w+)\b/ $replaces{$1} ? $replaces{$1} : $1 /ge;