Perl单行正则匹配行首g++失效问题求助
解决思路
- 先排查行首隐藏字符:执行
cat -A system.log查看日志原始内容,很多时候肉眼看不到的空格、制表符会藏在行首,这会导致^无法直接匹配到g++。 - 调整正则适配行首空白:把正则修改为
/^\s*(g\+\+)/,其中\s*会匹配0个或多个空白字符(空格、Tab都包含),不管行首有没有空白,只要后续跟着g++就能匹配成功。 - 简化正则写法:
g\+{2}可以直接写成g\+\+,功能完全一致,可读性更强。
最终可用命令:
perl -l -n -e 'print if m/^\s*(g\+\+)/;' system.log
如果确认行首绝对没有空白但仍匹配失败,可尝试添加多行修饰符m强制^匹配每行开头:
perl -l -n -e 'print if m/^(g\+\+)/m;' system.log
内容的提问来源于stack exchange,提问作者mskcc
相关产品推荐
相关产品推荐

