#include <cstdio>
#include <cstring>
#include <iostream>
#include <queue>
using namespace std;
const int mod=10007;
struct node
{
int ch[26],fail,cnt;
}p[6010];
int n,m,tot,sum,ans;
int f[110][6010];
char w[110];
queue<int> q;
int main()
{
scanf("%d%d",&n,&m);
int i,j,k,u,t;
tot=1;
for(i=1;i<=n;i++)
{
scanf("%s",w);
k=strlen(w);
for(j=0,u=1;j<k;j++)
{
if(!p[u].ch[w[j]-‘A‘]) p[u].ch[w[j]-‘A‘]=++tot;
u=p[u].ch[w[j]-‘A‘];
}
p[u].cnt=1;
}
q.push(1);
while(!q.empty())
{
u=q.front(),q.pop();
for(i=0;i<26;i++)
{
if(!p[u].ch[i])
{
if(u==1) p[u].ch[i]=1;
else p[u].ch[i]=p[p[u].fail].ch[i];
continue;
}
q.push(p[u].ch[i]);
if(u==1)
{
p[p[u].ch[i]].fail=1;
continue;
}
p[p[u].ch[i]].fail=p[p[u].fail].ch[i];
p[p[u].ch[i]].cnt|=p[p[p[u].fail].ch[i]].cnt;
}
}
f[0][1]=1;
for(i=1;i<=m;i++)
for(j=1;j<=tot;j++)
if(!p[j].cnt) for(k=0;k<26;k++)
f[i][p[j].ch[k]]=(f[i][p[j].ch[k]]+f[i-1][j])%mod;
for(i=1;i<=tot;i++)
if(!p[i].cnt) ans=(f[m][i]+ans)%mod;
for(i=1,sum=1;i<=m;i++) sum=(sum*26)%mod;
printf("%d",(sum-ans+mod)%mod);
return 0;
}