#include<bits/stdc++.h>
using namespace std;
const int N=1e6+5;
int t,n,m,k,L,len[N],v[N<<1],tot,ch[N][26];
long long d[N<<1],mn[N],f[N];
char a[N];
string s[N];
priority_queue<pair<int,int> >q;
void calc(){
	for(int i=0;i<=len[L]+k;i++) d[i]=1e18,v[i]=0;
	q.push({d[0]=0,0});
	while(q.size()){
		int x=q.top().second;q.pop();
		if(v[x]) continue; v[x]=1;
		int y=x+k;
		if(y<=len[L]+k&&d[y]>d[x]+1) d[y]=d[x]+1,q.push({-d[y],y});
		for(int i=1;i<=L;i++){
			int y=x-len[i];
			if(y>=1&&d[y]>d[x]+1) d[y]=d[x]+1,q.push({-d[y],y});
		}
	}
}
signed main(){
	scanf("%d",&t),mn[0]=1e18;
	while(t--){
		scanf("%d%d",&m,&k);
		for(int i=1;i<=m;i++)
			scanf("%s",a),s[i]=a,len[i]=s[i].size();
		sort(len+1,len+1+m),L=unique(len+1,len+1+m)-len-1;
		calc();
		for(int i=1;i<=tot;i++) fill(ch[i],ch[i]+26,0);
		tot=1;
		for(int i=1;i<=m;i++){
			int p=1,k,len=s[i].size();
			for(int j=1;j<=len;j++){
				if(!ch[p][k=s[i][j-1]-'a']) mn[ch[p][k]=++tot]=1e18;
				p=ch[p][k],mn[p]=min(mn[p],1+d[len-j]);
			}
		}
		scanf("%s",a+1),n=strlen(a+1);
		fill(f+1,f+1+n,1e18);
		for(int i=1;i<=n;i++){
			int p=1;
			for(int j=i;j<=n;j++)
				p=ch[p][a[j]-'a'],f[j]=min(f[j],f[i-1]+mn[p]);
		}
		printf("%lld\n",f[n]<1e18?f[n]:-1);
	}
	return 0;
}