I've been playing around with nested <TMPL_LOOP> structures in HTML::Template and I've run into some trouble. I have a hash with over 40 keys, and I want to turn it into a set of HTML tables like this:

Each table should be no more than 6 cells wide, including the <th>'s. I've got the HTML template defined as follows:

<TMPL_LOOP NAME=TABLE>
<table>
<tr>
<th>key</th>
<TMPL_LOOP NAME=KEYCELL>
<td><TMPL_VAR NAME=KEY></td>
</TMPL_LOOP>
</tr>
<tr>
<th>key</th>
<TMPL_LOOP NAME=VALCELL>
<td><TMPL_VAR NAME=VAL></td>
</TMPL_LOOP>
</tr>
</table>
</TMPL_LOOP>
[download]

My problem is that I can't for the life of me wrap my head around how to build the array to pass in the $template->param(TABLE => [ @array ]) line of my script. Any help with this would be greatly appreciated.

-rattus
__________
He seemed like such a nice guy to his neighbors / Kept to himself and never bothered them with favors
- Jefferson Airplane, "Assassin"