#include <iostream>
#include<map>
using namespace std;

#define int long long

int powpow(int a, int b){
	
	int ret=1;
	for(int i=0; i<b; i++){
		ret*=a;
	}
	
	return ret;
}

int calc(string t){
	
	int ret=0;
	for(int i=0; i<t.size(); i++){
			ret+=(t[i]-'A')*powpow(26, i);
	}
	
	return ret;
}

signed main() {
	
	string S;
	cin>> S;
	int M;
	cin>> M;
	string C[M];
	for(int i=0; i<M; i++) cin>> C[i];
	
	int ans=0;
	for(int len=1; len<=10; len++){
		if(S.size()<len) continue;
		int ha=calc(S.substr(0, len));
		map<int, int> memo;
		for(int k=0; k<S.size()-len; k++){
			memo[ha]++;
			ha-=S[k]-'A';
			ha/=26;
			ha+=(S[k+len]-'A')*powpow(26, len-1);
		}
		memo[ha]++;
		
		for(int k=0; k<M; k++){
			if(C[k].size()!=len) continue;
			ans+=memo[calc(C[k])];
		}
	}
	
	cout<< ans<< endl;
	
	return 0; 
}