$n=map keys%$_,each%h