#FFFFFF #DDDDFF ##
##

my $template = HTML::Template->new(
  filename          => 'template_name.tmpl',
  loop_context_vars => 1,
);

$template->param(rows => $dbh->selectall_hashref($statement));

print $cgi->header, $template->output;