my $check = scalar keys %{$hash{$key}};