Assuming that you columns will always be the same width in a given table and your data is in an AoA (from fetchall_arrayref of similar), you could do...

# Map the data into cols parameter.
my @rows = map { cols=>$_ } @{$datafromquery};
# Later
$template->param(rows=>\@rows);

<!-- the template -->
<tmpl_loop name="rows">
 <tr>
  <tmpl_loop name="cols">
   <td><tmpl_var name="value"></td>
  </tmpl_loop>
 </tr>
</tmpl_loop>
[download]

---

update
fixed typo. dws++

-Lee

"To be civilized is to deny one's nature."