use std::collections::HashMap;


fn main() {
    let mut s = String::new();
    std::io::stdin().read_line(&mut s).ok();
    let s = s.trim();
    let mut m = String::new();
    std::io::stdin().read_line(&mut m).ok();
    let m: usize = m.trim().parse().unwrap();
    let words = (0..m).map(|_| {
            let mut temp = String::new();
            std::io::stdin().read_line(&mut temp).ok();
            let temp = temp.trim();
            temp.to_string()
        })
        .collect::<Vec<_>>();

    let mut mapping = HashMap::new();
    for i in 1..=10 {
        if i > s.len() { break; }
        for j in 0..s.len()-i+1 {
            *mapping.entry(s[j..j+i].to_string()).or_insert(0usize) += 1;
        }
    }
    println!("{}", words.iter().map(|v| *mapping.get(v).unwrap_or(&0usize)).sum::<usize>());
}