如何匹配一个新行perl的

Question

我想匹配行看起来像这样

(white space)ERROR(some text)(new line) 
    (some text) 

我曾尝试是这样的正则表达式，而不是工作

if (/\sERROR(.*)(\n.*)/){ 
    } 

Answer 1

打印$_之前if。

1. 你确定你的字符串，其单空白开始？如果不是，则需要\s*而不是\s。

2. 嵌入换行符很少见，你确定你确实在那里有吗？如果是，则在最后的/后需要s修饰符。

如果一切都失败，请阅读the manual。

Answer 2

使用/s修改：/\sERROR(.*)(\n.*)/s。并注意您的贪心(.*)。