($n,$k)=glob<>;print map{/\w+$/g,$/}(sort map s/u(\w+)/sprintf"%8d",++$v[$1]/er,sort map{($s,$p,$u)=glob;sprintf"%8du%08d%8d %d",1e5-$s,$u,$p,$i++}<>)[0..$k-1]