in reply to Search a perl reference and replace characters
'some process replacing return chars. with (</p><p>)' =~ s(.*(</p><p>).*){\$input =~ s#\n#$1#g;}; [download]