This may or may not be useful, depending on what you want to do with the data once you get it. But you may want to look at the module Data::Table:

my $table = Data::Table::fromSQL($dbh,
                                 "select whatever from table where col
+ = ?",
                                 $val);
[download]

And the query result is stored in a Data::Table object. From there it can be extracted or manipulated at will. In a CGI program you can print it out as an HTML table easily: print $table->html;

buckaduck