string@a;
ll l=a.size();
ll v[26];
rep(i,l){
	v[a[i]-'a']=i;
}
ll@d[l][l],@n,@m;
string@s[n];
ll e[m][l]{};
rep(i,m){
	ll h[l]{};
	rep(k,n){
		++h[v[s[k][i]-'a']];
	}
	rep(j,l){
		rep(o,l){
			e[i][j]+=d[j][o]*h[o];
		}
	}
}
rep(k,n){
	ll z=0;
	rep(i,m){
		z+=e[i][v[s[k][i]-'a']];
	}
	wt(z);
}