Help for this page

Select Code to Download


  1. or download this
     my $simples = qr{\*\*};  # extensible by user.  Same opening and clos
    +ing.
     my $ps= qr{(?<prematch>.*?)
    ...
         | \Z (*:nada)  # must be the last branch
        )
        }xs;