Select Code to Download

my ($user, $password, $dsn); ### Set these to run code
my $sql = "select * from tablename where id=?";
...
  my $ref = $sth->fetchrow_hashref or return;
  return $ref;
}