my $VAR1 = {
   'apptimeupdated' => '20040315145142',
   'apptype' => [{
      'apt_defstatus' => [{
         'name' => 'Pending',
      }],
      'value' => '50',
   }],
};

my $tmpl = HTML::Template->new(filehandle => \*DATA);
$tmpl->param($VAR1);

print $tmpl->output;

__DATA__
<tmpl_var apptimeupdated>
<tmpl_loop apptype>
   <tmpl_var value>
   <tmpl_loop apt_defstatus>
      <tmpl_var name>
   </tmpl_loop>
</tmpl_loop>