お願いします。

ハッシュに、いくつの連想配列が含まれているのかを知りたいのですが、
やり方がわかりません。
わからないので仕方なく、
foreach (keys %HASH) { ++$HASH; }
のようなことをやっています。なにとぞお助け下さい・・・