Help for this page

Select Code to Download

Select or download this

my $string = "
start:
...
if ($string =~/(start: real)((.|\n)*(?!start: )(.|\n)*)*(end: real)/){
    print "$&";
    }

Select or download this
```
start: real
desired
string


end: real
```