@values = values(%hash);

foreach $i (@values)
{
   $count ++ if defined($i);
}