s/./$a{$&}++/gefor<>;printf"$_:%3d
",$a{$_}for A..Z,a..z