$dbh->disconnect();
print "Content-type: text/html\n\n";
print $tmpl->output();