/#/{split($0,f)}!/#/{for(l=0;l<NF;e[f[++l+1]]+=$l)}END{for(v in e)print e[v]v}