perl匹配多个单词与空格

Question

我正在尝试找到所有匹配的单词，这些单词以下面的内容开头并忽略它们

Delta Asset Management
Viger
Double binding
Base camp lift

我通过这个正则表达式尝试了但没有得到正确的结果。

if ($row =~ m/^(Delta Asset Management|Viger|Double binding|Base camp lift)/){ return undef; }

Answer 1

更改正则表达式以删除^并添加/g（全局），如：

/(Delta Asset Management|Viger|Double binding|Base camp lift)/g

Demo

或者，如果您需要保留^，请添加/m（多行选项），例如：

/^(Delta Asset Management|Viger|Double binding|Base camp lift)/gm

Demo