Select Code to Download

my $hash_ref;
while ( my $row = $sth->fetchrow_hashref ) {
...
    { 'option'      => $row->{ 'option' }, 
      'option_data' => $row->{ 'option_data' } };
}

my $rows = $sth->fetchall_arrayref;
my %hash = map { 
...
    'option_data'   => $_->[2]
  };
} @{$rows};

'1234' => [
  {
...
    'option' => 'baz'
  }
]