map { die "bug before!" if (!defined($_)); } values %{$self->{docs}};
my @docsObservs = map { $_->getObservations() } values %{$self->{docs}};
map { die "bug after!" if (!defined($_)); } values %{$self->{docs}};
print "ok\n";

##</code><code>##

bug after! at .....

##</code><code>##

map { die "bug before!" if (!defined($_)); } values %{$self->{docs}};
my @docsObservs;
foreach my $docP (values %{$self->{docs}}) {
  push(@docsObservs, $docP->getObservations());
}
map { die "bug after!" if (!defined($_)); } values %{$self->{docs}};
print "ok\n";

##</code><code>##

ok