#include <iostream>
#include <string>
#include <map>

using namespace std;

using ll =  long long;

constexpr ll BASE = 26;

int main() {
    string s;
    cin >> s;
    int n = s.length();

    ll hash[n][11];
    for(int i=0;i<n;++i){
        hash[i][1] = ll(s[i]-'A');
        for(int j=2;j<=n-i;++j) {
            hash[i][j] = hash[i][j-1] * BASE + ll(s[i+j-1]-'A');
        }
    }

    map<ll, int> hash_cnt[11];
    for(int i=1;i<=10;++i) {
        for(int j=0;j<n;++j) {
            ++hash_cnt[i][hash[j][i]];
        }
    }

    int m, cnt = 0;
    cin >> m;
    string c;
    for(int i=0;i<m;++i){
        cin >> c;
        int nc = c.length();
        ll c_hash = ll(c[0]-'A');
        for(int j=1;j<nc;++j) {
            c_hash = c_hash * BASE + ll(c[j]-'A');
        }

        cnt += hash_cnt[nc][c_hash];
    }

    cout << cnt << endl;
}