#line 1 "string/test/YUKI_Aho_Corasick.test.cpp"
#define PROBLEM "https://yukicoder.me/problems/no/430"
#line 2 "string/AhoCorasick.hpp"
#include<string>
#include<queue>
/**
* @brief Aho-Corasick法
*/
class AhoCorasick{
struct node;
using np=node*;
constexpr static int num=26;
constexpr static char base='A';
struct node{
np ch[num];
np link=nullptr;
int val=0;
node(){
for(int i=0;i<num;++i)ch[i]=nullptr;
}
};
np root=new node();
np root_par=new node();
public:
AhoCorasick(){
root->link=root_par;
for(int i=0;i<num;++i)root_par->ch[i]=root;
}
void insert(std::string v){
np t=root;
int idx=0;
while(idx<(int)v.size()){
if(!t->ch[v[idx]-base])t->ch[v[idx]-base]=new node();
t=t->ch[v[idx]-base];
idx++;
}
t->val++;
}
void build(){
built=1;
std::queue<np>que;
que.push(root);
while(!que.empty()){
np t=que.front();
que.pop();
for(int i=0;i<num;++i){
if(!t->ch[i])continue;
if(t==root){
t->ch[i]->link=t;
}else{
np s=t->link;
while(!s->ch[i]){
s=s->link;
}
t->ch[i]->link=s->ch[i];
}
que.push(t->ch[i]);
}
}
}
bool built=0;
int count(std::string v){
if(!built){build();built=1;}
np t=root;
int idx=0;
int res=0;
while(idx<(int)v.size()){
while(!t->ch[v[idx]-base]){
if(t==root){
idx++;
if(idx==(int)v.size())return res;
}else{
t=t->link;
}
}
t=t->ch[v[idx++]-base];
auto s=t;
while(s!=root){
res+=s->val;
s=s->link;
}
}
return res;
}
int find_first(std::string v){
if(!built){build();built=1;}
np t=root;
int idx=0;
int res=0;
while(idx<(int)v.size()){
while(!t->ch[v[idx]-base]){
if(t==root){
res++;
idx++;
if(idx==(int)v.size())return -1;
}else{
res++;
t=t->link;
}
}
t=t->ch[v[idx++]-base];
if(t->val>0)return res;
}
return -1;
}
};
#line 2 "util/template.hpp"
#pragma GCC optimize("Ofast")
#pragma GCC optimize("unroll-loops")
#pragma GCC target("avx2")
#include<bits/stdc++.h>
using namespace std;
struct __INIT__{__INIT__(){cin.tie(0);ios::sync_with_stdio(false);cout<<fixed<<setprecision(15);}}__INIT__;
typedef long long lint;
#define INF (1LL<<60)
#define IINF (1<<30)
#define EPS (1e-10)
#define endl ('\n')
typedef vector<lint> vec;
typedef vector<vector<lint>> mat;
typedef vector<vector<vector<lint>>> mat3;
typedef vector<string> svec;
typedef vector<vector<string>> smat;
template<typename T>using V=vector<T>;
template<typename T>using VV=V<V<T>>;
template<typename T>inline void output(T t){bool f=0;for(auto i:t){cout<<(f?" ":"")<<i;f=1;}cout<<endl;}
template<typename T>inline void output2(T t){for(auto i:t)output(i);}
template<typename T>inline void debug(T t){bool f=0;for(auto i:t){cerr<<(f?" ":"")<<i;f=1;}cerr<<endl;}
template<typename T>inline void debug2(T t){for(auto i:t)output(i);}
#define loop(n) for(long long _=0;_<(long long)(n);++_)
#define _overload4(_1,_2,_3,_4,name,...) name
#define __rep(i,a) repi(i,0,a,1)
#define _rep(i,a,b) repi(i,a,b,1)
#define repi(i,a,b,c) for(long long i=(long long)(a);i<(long long)(b);i+=c)
#define rep(...) _overload4(__VA_ARGS__,repi,_rep,__rep)(__VA_ARGS__)
#define _overload3_rev(_1,_2,_3,name,...) name
#define _rep_rev(i,a) repi_rev(i,0,a)
#define repi_rev(i,a,b) for(long long i=(long long)(b)-1;i>=(long long)(a);--i)
#define rrep(...) _overload3_rev(__VA_ARGS__,repi_rev,_rep_rev)(__VA_ARGS__)
// #define rep(i,...) for(auto i:range(__VA_ARGS__))
// #define rrep(i,...) for(auto i:reversed(range(__VA_ARGS__)))
// #define repi(i,a,b) for(lint i=lint(a);i<(lint)(b);++i)
// #define rrepi(i,a,b) for(lint i=lint(b)-1;i>=lint(a);--i)
// #define irep(i) for(lint i=0;;++i)
// inline vector<long long> range(long long n){if(n<=0)return vector<long long>();vector<long long>v(n);iota(v.begin(),v.end(),0LL);return v;}
// inline vector<long long> range(long long a,long long b){if(b<=a)return vector<long long>();vector<long long>v(b-a);iota(v.begin(),v.end(),a);return v;}
// inline vector<long long> range(long long a,long long b,long long c){if((b-a+c-1)/c<=0)return vector<long long>();vector<long long>v((b-a+c-1)/c);for(int i=0;i<(int)v.size();++i)v[i]=i?v[i-1]+c:a;return v;}
// template<typename T>inline T reversed(T v){reverse(v.begin(),v.end());return v;}
#define all(n) begin(n),end(n)
template<typename T,typename E>bool chmin(T& s,const E& t){bool res=s>t;s=min<T>(s,t);return res;}
template<typename T,typename E>bool chmax(T& s,const E& t){bool res=s<t;s=max<T>(s,t);return res;}
const vector<lint> dx={1,0,-1,0,1,1,-1,-1};
const vector<lint> dy={0,1,0,-1,1,-1,1,-1};
#define SUM(v) accumulate(all(v),0LL)
template<typename T,typename ...Args>auto make_vector(T x,int arg,Args ...args){if constexpr(sizeof...(args)==0)return vector<T>(arg,x);else return vector(arg,make_vector<T>(x,args...));}
#define extrep(v,...) for(auto v:__MAKE_MAT__({__VA_ARGS__}))
#define bit(n,a) ((n>>a)&1)
vector<vector<long long>> __MAKE_MAT__(vector<long long> v){if(v.empty())return vector<vector<long long>>(1,vector<long long>());long long n=v.back();v.pop_back();vector<vector<long long>> ret;vector<vector<long long>> tmp=__MAKE_MAT__(v);for(auto e:tmp)for(long long i=0;i<n;++i){ret.push_back(e);ret.back().push_back(i);}return ret;}
using graph=vector<vector<int>>;
template<typename T>using graph_w=vector<vector<pair<int,T>>>;
template<typename T,typename E>ostream& operator<<(ostream& out,pair<T,E>v){out<<"("<<v.first<<","<<v.second<<")";return out;}
constexpr inline long long powll(long long a,long long b){long long res=1;while(b--)res*=a;return res;}
#line 4 "string/test/YUKI_Aho_Corasick.test.cpp"
int main(){
string s;
cin>>s;
lint q;
cin>>q;
AhoCorasick aho;
while(q--){
string t;
cin>>t;
aho.insert(t);
}
cout<<aho.count(s)<<endl;
}
string/test/YUKI_Aho_Corasick.test.cpp