$numSubKeys=map{keys %{$hash{$_}} }keys %hash