Perl Regex: multi-line match

#! perl -w $/ = " /n "; $_ = " line_a /n line_b "; if ( / a (.*) b /s ) {     print $1 }