$x=length+(sort map 1x y===c, keys%h)[-1];