$TemplateParser = new Parse::RecDescent(<<'__GRAMMAR__');

   template:  identifier 'TEMPLATE' '{' statement(s) '}'

   statement: expression
            | conditional
            | loopcontrol
            | <do-this-other-parser: $QueryParser->query() >

__GRAMMAR__