# query example
query:[ select foo from table X where foo.whatever is acceptable ]

##</code><code>##

# template example
identifier TEMPLATE
{
  code; code; code;
  query:[....];
  more code that uses query results; etc.
}

##</code><code>##

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

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

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

__GRAMMAR__