Select Code to Download

my $rows = $sth->fetchall_arrayref();

$options = get_options()
<

change_dboption ( \$dbh, $DB, $date, $options );

my $count = 1;
my %option_ref = ();
...
%option_ref = {$count => @$option};
$count++;
}