Select Code to Download

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

...
}
$template->param(loop => \@loop);
print $template->output();

<table>
  <tr>
  <tmpl_loop loop>
...
  </tmpl_loop>
  </tr>
</table>