gets;p$<.map{|s|i=-1;t+=1while i=$_.index(s.chop,i+1)}.sum