Help for this page

Select Code to Download

Select or download this

$text = 'ab';
if ($text =~ /(a*)((?:ab)*|b*)/) {
...
if ($text =~ /(a*)(b*|(?:ab)*)/) {
    print "'$1', '$2' \n";
}

Select or download this
```
'a', ''
'a', 'b'
```