Select Code to Download

my %hash = (
   id => 'foo',
   id => 'bar',
   id => 'baz',
);

my $sth = $dbh->prepare('select 1,1,1');

...
$sth = $dbh->prepare('select 1 as a,1 as b,1 as c');
$sth->execute;
print Dumper $sth->fetchrow_hashref;