my $rand_position = $positions_ref->[ rand( $#{$positions_ref} ) ];
   my $rand_location = $locations_ref->[ rand( $#{$locations_ref} ) ];