use std::io::BufRead;

fn run() {
    let stdin = std::io::stdin();
    let mut stdin = stdin.lock();
    let mut s = String::new();
    stdin.read_line(&mut s).unwrap();
    let s: Vec<char> = s.trim().chars().collect();
    let mut dp = vec![0 as u64; s.len() + 1];
    let mut pow = vec![1; s.len() + 1];
    let r = 27;
    let mut map = std::collections::HashMap::new();
    for i in 0..s.len() {
        dp[i + 1] = dp[i] * r + (s[i] as u64 + 1 - 'A' as u64);
        pow[i + 1] = pow[i] * r;
        for j in 0..std::cmp::min(10, i + 1) {
            let v = dp[i + 1] - dp[i - j] * pow[j + 1];
            let po = map.entry(v).or_insert(0);
            *po += 1;
        }
    }
    let mut ans = 0;
    let mut s = String::new();
    stdin.read_line(&mut s).unwrap();
    let m: usize = s.split_whitespace().next().unwrap().parse().ok().unwrap();
    for _ in 0..m {
        s.clear();
        stdin.read_line(&mut s).unwrap();
        let s: Vec<char> = s.trim().chars().collect();
        let mut hash = 0;
        for c in s.iter() {
            hash = r * hash + (*c as u64 + 1 - 'A' as u64);
        }
        match map.get(&hash) {
            Some(&c) => ans += c,
            None => (),
        }
    }
    println!("{}", ans);
}

fn main() {
    run();
}