Help for this page

Select Code to Download

Select or download this

$s = "***ab***c"; 
$s =~ s/\*([^\n])/\*\n\1/ for 1 .. 2; 
print $s;

Select or download this
```
*
*
*ab***c
```