正则表达式：除了组以外的所有组件

Question

我需要删除正则表达式中所有匹配的组。一个玩具的例子是：

echo 'spam 123 ham 345 eggs' | perl -pe 's/( \d+ )/SOMETHING/g'

123 345

perl正则表达式会删除除匹配组之外的所有内容吗？匹配的组可能比数字更复杂 - 我可以定义要匹配的组，但在组之外我可以包含任何随机字符

Answer 1

只需加入所有比赛即可。我不知道Perl，但这样的事情可能有用：

$result = join('', $subject =~ m/\s*\d+\s*/g);