Help for this page

Select Code to Download

Select or download this

$line = "this is a test [[ this is a test ]
]";
$line =~ s/\[\[[^\]]*\]\s*\]/***FOO***/sg;
print "Line: '$line'\n";

Select or download this
```
Line: 'this is a test ***FOO***'
```