Select Code to Download

my $hash = $dbh->selectall_arrayref("SELECT id,name,age FROM foo",
                                    "id");

# ...
my @rows;
$sth->execute();
...
{
     push(@rows, { %$row });   # Force unique reference
}