1 2 3 4 5 6 7 8 9 10 11
$text = <<EOS; div class equals main span id equals marquee blog! slash span slah div EOS print "Before: $text \n\n\n\n"; $text =~ s/\n/\|\|/g; print "After: $text \n\n\n\n";
Before: div class equals main span id equals marquee blog! slash span slah div After: div class equals main||span id equals marquee||blog! slash span slah div||