=begin filter ppi | html nnn=1 "hot cross buns" =~ /cross/; print "Matched: <$`> $& <$'>\n"; # Matched: cross < buns> print "Left: <$`>\n"; # Left: print "Match: <$&>\n"; # Match: print "Right: <$'>\n"; # Right: < buns> =end __RESULT__ +ppi+html
      1 <span class="double">&quot;hot cross buns&quot;</span> <span class="operator">=~</span> <span class="match">/cross/</span><span class="structure">;</span>
      2 <span class="word">print</span> <span class="double">&quot;Matched: &lt;$`&gt; $&amp; &lt;$'&gt;\n&quot;</span><span class="structure">;</span>    <span class="comment"># Matched: &lt;hot &gt; cross &lt; buns&gt;</span>
      3 <span class="word">print</span> <span class="double">&quot;Left:    &lt;$`&gt;\n&quot;</span><span class="structure">;</span>            <span class="comment"># Left:    &lt;hot &gt;</span>
      4 <span class="word">print</span> <span class="double">&quot;Match:   &lt;$&amp;&gt;\n&quot;</span><span class="structure">;</span>            <span class="comment"># Match:   &lt;cross&gt;</span>
      5 <span class="word">print</span> <span class="double">&quot;Right:   &lt;$'&gt;\n&quot;</span><span class="structure">;</span>            <span class="comment"># Right:   &lt; buns&gt;</span>
__RESULT__ +ppi-html
    "hot cross buns" =~ /cross/;
    print "Matched: <$`> $& <$'>\n";    # Matched: <hot > cross < buns>
    print "Left:    <$`>\n";            # Left:    <hot >
    print "Match:   <$&>\n";            # Match:   <cross>
    print "Right:   <$'>\n";            # Right:   < buns>
__RESULT__ -ppi+html
    "hot cross buns" =~ /cross/;
    print "Matched: <$`> $& <$'>\n";    # Matched: <hot > cross < buns>
    print "Left:    <$`>\n";            # Left:    <hot >
    print "Match:   <$&>\n";            # Match:   <cross>
    print "Right:   <$'>\n";            # Right:   < buns>
__RESULT__ -ppi-html
    "hot cross buns" =~ /cross/;
    print "Matched: <$`> $& <$'>\n";    # Matched: <hot > cross < buns>
    print "Left:    <$`>\n";            # Left:    <hot >
    print "Match:   <$&>\n";            # Match:   <cross>
    print "Right:   <$'>\n";            # Right:   < buns>