_=$<.read.scan /./;$$.times{|x|y=_.grep(x=x.chr).size;y>0&&printf("%s:%3d\n",x,y)}