Select Code to Download

my $ref = $sth->fetchall_arrayref;

...
$sth->finish();
$dbh->disconnect();
return($query_results);

my $ref = &select_query($sqlstatement);

...
    {$query_results .= "<td>$field</td>"; }
  $query_results .= "</tr>";    
}