Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"my $s1 = 'foo not *UN*known but bar is';
...
 print qq{all after: '${^POSTMATCH}'};
"
all after: ' but bar is'