Perl Smarty Parser Grammar

I need a grammar to parse Smarty .tpl template files ([login to view URL]) both for the Smarty tags and the HTML tags. The grammar should be based on any CPAN available parser like Parse::RecDescent or Parse::Yapp allowing Text::Balanced for opening/closing tag detection. To test the grammar file, a simple parser to report tag events is sufficient (and you will most likely have one as develop the grammar): Opening tag discoverd - Closing tag discovered. The deliverables are thus the grammar file and the test driver. Payment via escrow here on GAF. Please post if you have any questions. Regards, Ted