http://www.perlmonks.org?node_id=1067599


in reply to Re^2: Perl RE; how to capture, and replace based on a block?
in thread Perl RE; how to capture, and replace based on a block?

... sed ...

here is my test program 

use re 'debug';
$_ = q{</div>
</body>};
print 'does it match ', int m{\<\/div\>\n\<\/body\>};

[download]

In Section Seekers of Perl Wisdom