If the queries I'm working with are going to be fairly static, I'll generally trade in my fetchrow_hashref calls for pseudo-hashes created with fetchrow_array instead.

It generally ends up looking something like this:

my $order = { col_one => 1, col_two => 2 };
my $sth = $dbh->prepare("SELECT col_one,col_two FROM table");
$sth->execute();

my $row = [$order, $sth->fetchrow_array()];
print "<LI>This is the data for col_one: $row->{col_one}</LI>";
[download]

Or something like that, the only downside being: if I change the SQL query in my dbh->prepare() call, I'll have to make the corresponding changes to the order hashref above. This saves the DBI overhead of having to check the column names for each query, plus you get the benefits (IMO, at least) of pseudo-hashes over plain hashrefs -- wether or not you like them is up to you, here is one small discussion on the matter: Are pseudo-hashes worth the effort?