using System;
using System.Text;
using System.Linq;
using System.Collections.Generic;

public class Program
{
    public void Proc() {
        Reader.IsDebug = false;
        string text = Reader.ReadLine();
        int mtCount = int.Parse(Reader.ReadLine());
        Dictionary<char, List<string>> dic = new Dictionary<char, List<string>>();
        for(int i=0; i<mtCount; i++) {
            string wrd = Reader.ReadLine();
            if(!dic.ContainsKey(wrd[0])) {
                dic.Add(wrd[0], new List<string>());
            }
            dic[wrd[0]].Add(wrd);
        }
        dic.ToList().ForEach(a=>a.Value.Sort((b,c)=>b.Length<c.Length?-1:b.Length>c.Length?1:0));

        long ans = 0;
        for(int i=0; i<text.Length; i++) {
            if(!dic.ContainsKey(text[i])) {
                continue;
            }
            foreach(string wrd in dic[text[i]]) {
                if(text.Length-i<wrd.Length) {
                    break;
                }
                if(wrd.Equals(text.Substring(i, wrd.Length))) {
                    ans++;
                }
            }
        }
        Console.WriteLine(ans);

        
    }


    public class Reader {
        public static bool IsDebug = true;
        private static System.IO.StringReader SReader;
        private static string InitText = @"



ABAACABCAACBABABACBBAC
7
A
C
AA
ABB
ABA
BA
CBBAC


";
        public static string ReadLine() {
            if(IsDebug) {
                if(SReader == null) {
                    SReader = new System.IO.StringReader(InitText.Trim());
                }
                return SReader.ReadLine();
            } else {
                return Console.ReadLine();
            }
        }
    }
    public static void Main(string[] args)
    {
        Program prg = new Program();
        prg.Proc();
    }
}