sub recurse_template {
  my $template_name = shift;

  my $template = new HTML::Template(filename => $template_name);
  
  my $value = recurse_template('template.tmpl');
  $template->params(param => $value);
  return $template->output();
}