This Mason component is helpful for debugging and developing. It
outputs plain HTML tables eg for SQL query results. You can either:
- <& dumptable, sth = $executed_statement_handle &>
+ <& dumptable, sth => $executed_statement_handle &>
in which case it will consume the results of the statement and
print them unconditionally, or do the equivalent of:
<& dumptable:start, sth => $sth, [ qa => $qa ] &> or
% }
</%method>
+<%method literal>
+<%args>
+$cols
+$rows
+$qa => undef
+</%args>
+<& SELF:start, cols => $cols &>
+% foreach my $row (@$rows) {
+<& SELF:row, cols => $cols, row => $row &>
+% }
+<& SELF:end &>
+</%method>
+
<& SELF:start, sth => $sth &>
% my $row;
% while ($row= $sth->fetchrow_hashref) {