Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
/(aaa.*?ccc)(?{push @qqq, $&})(*F)/g;

print join("\n", @qqq, '');

Select or download this
```
aaa bbb ccc
aaa bbb ccc ddd ccc
```