s/x/$b[$a[pos]++]++/ge for<>;print@b+1