# values( %hash )
$count = values %StateName;  # $count is one less since we deleted DC
print "There are $count elements in the hash.\n\n";
foreach $State (values(%StateName)) {
	print "State name is '$State'\n";
}
print "\n";