using System;

using System.Collections;
using System.Collections.Generic;
using System.Collections.Specialized;
using System.Text;
using System.Text.RegularExpressions;
using System.Linq;
using System.IO;

class Program
{
    static void Main(string[] args)
    {
        new Magatro().Solve();
    }
}

public class Magatro
{
    private string S;
    private int M;
    private string[] C;
    const int AlphabetNum = 26;
    int Cnt = 0;

    private void Scan()
    {
        S = Console.ReadLine();
        M = int.Parse(Console.ReadLine());
        C = new string[M];
        for (int i = 0; i < M; i++)
        {
            C[i] = Console.ReadLine();
        }
    }

    public void Solve()
    {
        Scan();
        Roll();
        Console.WriteLine(Cnt);
    }

    private void Roll()
    {
        long[] hash = new long[11];
        long[] pow = new long[11];
        pow[0] = 1;
        for (int i = 1; i <= 10; i++)
        {
            pow[i] = pow[i - 1] * (AlphabetNum + 1);
        }

        long[] search = C.Select(ToLong).ToArray();

        for (int i = 0; i < S.Length; i++)
        {
            for (int j = 1; j <= 10; j++)
            {
                if (i >= j-1)
                {
                    hash[j] += pow[j - 1] * Map(S[i]);
                    if (search.Contains(hash[j])) Cnt++;
                    hash[j] /= (AlphabetNum + 1);

                }
                else
                {
                    hash[j] += pow[i]*Map(S[i]);
                }
            }
        }
    }

    private long ToLong(string s)
    {
        long result = 0;
        long digi = 1;
        for (int i = 0; i < s.Length; i++)
        {
            result += Map(s[i]) * digi;
            digi *= AlphabetNum + 1;
        }
        return result;
    }

    private int Map(char c)
    {
        return c - 64;
    }
}