use strict;
use warnings;
use HTML::Template;

my $template = HTML::Template->new(filename => './test.tmpl');

my @daten = (
              {
                'var11' => 'val11',
                'var12' => [
                             {
                               'var21' => 'val21',
                               'var22' => [
                                            {
                                              'var31' => 'val31',
                                              'var32' => 'val32'
                                            }
                                          ]
                             }
                           ]
              }
            );


$template->param(LOOP => \@daten);

print $template->output();