Perl Regex: multi-line match

来源:互联网 发布:msn软件下载 编辑:程序博客网 时间:2024/05/21 04:00
#! perl -w
$/ = "/n";

$_ = "line_a/nline_b";
if ( /a(.*)b/s ) {
    print $1
}
原创粉丝点击