_=$<.read.downcase.tr('^a-z ','').split.sort puts$*|_.map{|w|[_.grep(w).size,w]*' '}