my $count = keys %hash;

##</code><code>##

my $count = keys %{$hash{first}};