Use this: $size = scalar keys %hash;