Something

// Original Template

<tpl:foo>
	<tpl:if test="12">
		...
	</tpl:if>
	<bar foo="{'blah'|'foo'}" bar="one two\" ''' lalla\""/>
	<lala>
		...
	</lala>
	<frob></frob>
</tpl:foo>

// Processed version:

foo {
if( 12 ){
$self->out( '...\n	' );
}
$self->out( '<bar foo="' );
$self->out( $self->varsubst( 'blah', 'foo' ) );
$self->out( '" bar="one two&quot; &lsquo;&lsquo;&lsquo; lalla&quot;" />' );
$self->out( '<lala>' );
$self->out( '...\n	' );
$self->out( '</lala>' );
$self->out( '<frob>' );
$self->out( '</frob>' );
}