my $table = HTML::Table::FromDatabase->new( -sth => $sth, -html => 'escape', -border => 1, ); print "this is the page title

this is the header

"; print $table->getTable; print "this is the end";