# time = O(N)   memory = O(N)

my $count = 0;
$count += @$_ for values %h;