my $count = scalar keys %{ $doc };