while ( $row = $sth->fetchrow_hashref ) { push @Options, '<option value="' . $row->{campo1} . '">' . $row->{campo2} . '</option>'; }