<pre name="code" class="html">[root@backoffice01 ~]# cat a1.pl
my $_="aa
2bb
3cc";
if ($_=~/aa$\n^2bb\n3cc/){print "1111111111\n"};
if ($_=~/aa\n^2bb\n3cc/m){print "2222222222\n"};
[root@backoffice01 ~]# perl a1.pl
2222222222
/m 当然多行处理
/m 修改荀彧^和$来立即匹配一个嵌入的换行前后
分别的,
/^=head[1-7]/m 会匹配模式不只是记录的开头,但任何地方在一个新行后
The /m modifier allows ^ and $ to match immediately before and after an embedded newline, respectively. /^=head[1-7]/m would match that pattern not just at the beginning of the record, but anywhere
right after a newline as well
perl /m
转载本文章为转载内容,我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题,欢迎原作者联系我们进行内容更正或删除文章。
上一篇:分页
提问和评论都可以,用心的回复会被更多人看到
评论
发布评论
相关文章
-
M7二极管
M7二极管
电路设计 无线通讯 数据传输 -
perl
perl 编码风格:1.K.R2.GNU3.BSD采用K&R
职场 休闲 perl