use strict;
use warnings;
use HTML::Template::Compiled;
my $htc = HTML::Template::Compiled->new(
tagstyle => [qw(+asp -comment -php -tt)],
scalarref => \<<'EOT');
<%= var%>
<%LOOP loop%>
<%= var%>
value? <%= __HTC__.param.var%>
<%/LOOP%>
EOT
$htc->param(
var => 'value',
loop => [{var => 'loop_value'}],
);
print $htc->output();
__END__
value
loop_value
value?