$sth->execute or quit();

my @headers= @{ $sth->{NAME} };
my $rows= $sth->fetchall_arrayref();

my $t= Text::Table->new( @$rows );
print $t;