$ perl -MHTML::Template -e '$in = join "", <>; $tmpl = HTML::Template->new( scalarref => \$in ); print $tmpl->output;'
Hi

<TMPL_IF foo>
<TMPL_INCLUDE foo.txt>
</TMPL_IF>

Hello

##</code><code>##

Hi



Hello