我真的不会写情书

#include<bits/stdc++.h>
using namespace std;
int a,l,r,ans;string s[102],s2;
int main(){
	cin>>a;
	for(int i=1;i<=a;i++){
		cin>>s2;string s1="";
		for(int j=0;j<s2.size();j++)
		if(s2[j]<='Z'&&s2[j]>='A')
			s1+='a'+s2[j]-'A';
		else s1+=s2[j];
		s[i]=s1;
		//cout<<s[i]<<'\n';
	}
	char ch=getchar();
	getline(cin,s2);
	for(int i=0;i<s2.size();i++)
		if(s2[i]<='Z'&&s2[i]>='A')
			s2[i]='a'+s2[i]-'A';
	//cout<<s2<<'\n';
	while(1){
		r=s2.find('.');
		if(r==-1) break;
		s2[r]='1';
		for(int i=1;i<=a;i++){
			int kkk=s2.find(s[i],l);
			if(kkk<=r&&kkk!=-1)ans++;
		}
		l=r+1;
	}
	cout<<ans;
	return 0;
}