while( @result_array = $query->fetchrow_array ) {
   my $col = $self->{fields}{$result_array[2]};
   $col->{Object_ID}  = $result_array[0];
   # and so on ...
}