Help for this page
@arr=$sth->fetchrow or do { print ''; return; }
use strict; use HTML::Template; ... $templ->param($row); print $templ->output; }