my $number_of_entities = grep defined $hoh{$_}, keys %hoh;