Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
   split m{\n+}, $string;

print qq{->$newString<-\n};

Select or download this
```
->one two
three
four five
six<-
```