[Cascavel-pm] Gramáticas, Parse::RecDescent (era: Casos de Sucesso)

[Flavio S. Glock]

Em 10/08/07, Nelson Ferraz<nferraz em gmail.com> escreveu:
> On Aug 9, 2007, at 10:10 PM, Flavio S. Glock wrote:
> > Aí vai um exemplo usando o v6.pm
>
> Eu modifiquei o token interpol para fazer match até o final da linha:
>
> token interpol {
>      ^^
>      <sp>+
>      '%'
>          $<content> := ([ <!before $$> . ]+)
>      $$
>      { return '[% ' ~ $<content> ~ ' %]' }
> }

que tal:

 token interpol {
    ^^
    (<sp>+)
    '% '
        $<content> := (\N+)
    { return $0 ~ '[% ' ~ $<content> ~ ' %]' }
 }

esta versão conserva a formatação original

- Flavio S. Glock