Alternatively I'd like to suggest HTML::Template::Compiled. In your script you just need to say:

my $htc = HTML::Template::Compiled->new(filename => "template_whthr.tm
+pl");
$htc->param( table => $table );
print $htc->output;
[download]

Because it's possible to call methods on objects in HTC you just need the following in your template:

<%= table.html %>
[download]

If you prefer your own formatting, it's should be possible to subclass Data::Table to use an own to_html-method.