package yukicoder;

import java.util.*;

public class Q430 {
	public static void main(String[] args) {
		new Q430().run();
	}

	void run() {
		solver();
	}

	void solver() {
		TrieByList trie=new TrieByList();
		Scanner sc=new Scanner(System.in);
		char[] s=sc.next().toCharArray();
		int m=sc.nextInt();
		while(m-->0){
			trie.add(sc.next().toCharArray());
		}
		trie.buildFailure();
		System.out.println(trie.countHit(s));
	}

	class TrieByList {
		Node root = new Node(0, (char) -1);
		int gen = 1;

		class Node {
			int id;
			char c;
			Node[] child=null;
			int ptn=0;
			int p=0;
			Node fail;
			int hit = 0;

			public Node(int id, char c) {
				this.id = id;
				this.c = c;
			}

			Node search(char c) {
				if (ptn << 31 - (c - 'a') < 0)
					return child[Integer.bitCount(ptn << 31 - (c - 'a')) - 1];
				else
					return null;
			}

			void append(Node n) {
				if (p == 0)
					child = new Node[1];
				else if (p + 1 > child.length) {
					child = Arrays.copyOf(child, child.length * 2);
				}

				int zind = Integer.bitCount(ptn << 31 - (n.c - 'a'));
				System.arraycopy(child, zind, child, zind + 1, p - zind);
				child[zind] = n;
				ptn |= 1 << (n.c - 'a');
				++p;
			}
		}

		void add(char[] s) {
			Node pre = null;
			Node cur = root;
			for (char c : s) {
				pre = cur;
				cur = pre.search(c);
				if (cur == null) {
					cur = new Node(gen++, c);
					pre.append(cur);
				}
			}
			++cur.hit;
		}

		void buildFailure() {
			root.fail = null;
			Queue<Node> q = new ArrayDeque<>();
			q.add(root);
			while (!q.isEmpty()) {
				Node cur = q.poll();
				outer: for (int i = 0; i < cur.p; ++i) {
					Node ch = cur.child[i];
					q.add(ch);
					for (Node to = cur.fail; to != null; to = to.fail) {
						Node next = to.search(ch.c);
						if (next != null) {
							ch.fail = next;
							ch.hit += next.hit;
							continue outer;
						}
					}
					ch.fail = root;
				}
			}
		}

		int countHit(char[] s) {
			int hit = 0;
			Node cur = root;
			outer:for (char c : s) {
				 for (Node to = cur; to != null; to = to.fail) {
					Node next = to.search(c);
					if (next != null) {
						hit += next.hit;
						cur = next;
						continue outer;
					}
				}
				cur = root;
			}
			return hit;
		}
	}
}