Help for this page

Select Code to Download

Select or download this
```
my @foo = split "\n|\r\f", $test;
```

Select or download this

$test =~ s/\n/**/g; ## replace all \n with '**'
$test =~ s/\r/!!/g; ## replace all \r with '!!'
print STDERR qq/'$test'/;