#include<random>
#include<iostream>
#include<iomanip>
#include<ctime>
#include<cmath>
#include<cctype>
#include<cstdio>
#include<cstdlib>
#include<climits>
// #define NDEBUG
#include<cassert>
#include<cstring>
#include<complex>
#include<algorithm>
#include<set>
#include<map>
#include<stack>
#include<queue>
#include<bitset>
#include<vector>
// #define LL __int128
#define LL long long
#define ULL unsigned LL
#define uint unsigned int
// #define int LL
// #define double long double
#define mkp make_pair
#define par pair<int,int>
#define epb emplace_back
#define psb push_back
#define f(x) ((x).first)
#define s(x) ((x).second)
using namespace std;
#define Lbt(x) ((x)&(-(x)))
#define Swap(x,y) (x^=y^=x^=y)
const int Mxxx=1e5;
inline char gc()
{
    // return getchar();
    static char buf[Mxxx],*p1=buf,*p2=buf;
    return (p1==p2&&(p2=(p1=buf)+fread(buf,1,Mxxx,stdin),p1==p2))?EOF:*p1++;
}
inline char pc(char ch,bool fl=false)
{
    // return fl?0:putchar(ch),0;
    static char buf[Mxxx],*p1=buf,*p2=buf+Mxxx;
    return (fl||((*p1++=ch)&&p1==p2))&&(fwrite(buf,1,p1-buf,stdout),p1=buf),0;
}
#define output pc('!',true)
inline int read()
{
    char ch=gc();
    int gans=0,gflag=0;
    for(;ch<'0'||'9'<ch;ch=gc())gflag|=(ch=='-');
    for(;'0'<=ch&&ch<='9';ch=gc())gans=(gans<<1)+(gans<<3)+(ch^48);
    return gflag?-gans:gans;
}
template<typename T>
inline char read(T&gans)
{
    char ch=gc();
    int gflag=0;gans=0;
    for(;ch<'0'||'9'<ch;ch=gc())gflag|=(ch=='-');
    for(;'0'<=ch&&ch<='9';ch=gc())gans=(gans<<1)+(gans<<3)+(ch^48);
    return gans=gflag?-gans:gans,ch;
}
template<typename T>
inline void write(T x)
{
    if(x>9)write(x/10);
    pc(x%10^48);
}
template<typename T>
inline void writenum(T x,char ch)
{
    if(x<0)x=-x,pc('-');
    write(x),pc(ch);
}
inline void writechar(char x,char ch)
{
    pc(x),pc(ch);
}
template<typename T>
inline T Max(T x,T y)
{
    return x>y?x:y;
}
template<typename T>
inline T Min(T x,T y)
{
    return x<y?x:y;
}
template<typename T>
inline T Abs(T x)
{
    return x<0?-x:x;
}
template<typename T>
inline void ckmx(T&x,T y)
{
    x=Max(x,y);
}
template<typename T>
inline void ckmn(T&x,T y)
{
    x=Min(x,y);
}
inline char gt()
{
    char ch=gc();
    for(;ch<'a'||'z'<ch;ch=gc());
    return ch;
}
namespace Tr
{
    const int Mx=1e6;
    int rt,cnt,lst,nxt[Mx+5][26],tot[Mx+5],ttt[Mx+5];
    inline void Clr()
    {
        rt=cnt=1;
    }
    inline void Pre()
    {
        lst=rt;
    }
    LL pr[26][26];
    inline void Ins(char ch)
    {
        int c=ch-'a';
        if(!nxt[lst][c])nxt[lst][c]=++cnt;
        for(int i=0;i<26;i++)if(nxt[lst][i]&&i^c)pr[c][i]+=tot[nxt[lst][i]];
        lst=nxt[lst][c];
        tot[lst]++;ttt[lst]++;
    }
    inline int Get()
    {
        return --ttt[lst];
    }
    inline LL Ask(int*c)
    {
        int i,j;LL t=0;
        // cout<<"Ck_Ask_pr:"<<pr['a'-'a']['c'-'a']<<"\n";
        for(i=0;i<26;i++)for(j=i+1;j<26;j++)t+=pr[c[i]][c[j]];
        return t;
    }
}
int n,Q,chr[26];LL tot;
signed main()
{
    #ifndef ONLINE_JUDGE
    freopen("_.in","r",stdin);
    // freopen("_.out","w",stdout);
    #endif
    int i;char ch;n=read(),Q=read();Tr::Clr();
    for(i=1;i<=n;i++)
    {
        Tr::Pre();
        for(ch=gt();'a'<=ch&&ch<='z';ch=gc())Tr::Ins(ch);
        tot+=Tr::Get();
    }
    // cout<<"Ck_tot:"<<tot<<"\n";
    for(;Q;Q--)
    {
        for(i=0;i<26;i++)chr[i]=gt()-'a';
        writenum(tot+Tr::Ask(chr),10);
    }
    return output;
}
/*
5 1
aac
oiputata
aaa
suikabudada
aba
abcdefghijklmnopqrstuvwxyz
*/
/*
 5 3
 aac
 oiputata
 aaa
 suikabudada
 aba
 abcdefghijklmnopqrstuvwxyz
 qwertyuiopasdfghjklzxcvbnm
 aquickbrownfxjmpsvethlzydg
*/