Help for this page
my $response = HTML::Template->new( filename => $filename, ... my $sth = exec_query($sqlquery) or die("Wacka!!"); my $arrayref = $sth->fetchall_arrayref({}); $response->param(LOOPTEST => $arrayref);
<!--BEGIN Dynamic data table--> <TMPL_UNLESS NAME=LOOPTEST> ... </TMPL_IF> </TMPL_LOOP> <!--END Dynamic data table-->