#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

#define rd_init() char*rp=({char*mmap();mmap(0l,1l<<25,1,2,0,0ll);})
#define rd_skip() while(*rp++>=48)
#define wt(v) ({ulong _z=v;do*--wp=_z%10+48;while(_z/=10);})
#define rrep(v,e) for(typeof(e) v=e;v--;)

typedef unsigned long ulong;

char wbuf[1<<25];

int main(){
	int z[26]={};
	{
		rd_init();
		rd_skip();
		for(int c;c=*rp++-'A',c>=0;){
			z[c]+=1;
		}
	}
	{
		char*wp=wbuf+sizeof wbuf;
		rrep(c,26){
			wt(z[c]);
		}
		write(1,wp,wbuf+sizeof wbuf-wp);
	}
	_exit(0);
}