如何在 Perl 中的替换中插入整个匹配的文本？

Question

A我想在所有特定的其他字符串 ( ) 之后添加一个字符串 ( ) bbc。因此，我匹配并想用附加的 ( )bbc将其替换为自身。A\'aabbcc\' => \'aabbcAc\'

\n\n

是否有替换的反向引用被整个匹配所取代？

\n\n

$0\xe2\x80\x93 似乎不起作用，由于某种原因，其内容始终为“-e”：\n\n$ echo \'aabbcc\' | perl -p -e \'s/bbc/$0A/g\'\naa-eAc\n

\n

Answer 1

使用$&，请参阅https://perldoc.perl.org/perlvar#$&

$ echo 'aabbcc' | perl -p -e 's/bbc/$&A/g'
aabbcAc