Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"my $s = '----abc123++++';
...
 print qq{'${^PREMATCH}' '${^MATCH}' '${^POSTMATCH}' ($1) ($2)};
"
'----' 'abc123' '++++' (abc) (123)