#include <bits/stdc++.h>
#define cs const
#define pb push_back
using namespace std;
using ll = long long ; 
using pi = pair <int, int> ;

void cmn(ll &x, ll y) {
    if(x > y) x = y; 
}

cs int N = 1e6 + 5;
cs int M = 5e3 + 5; 

int T; 
int ch[N][26], nd; 
int n, k; 
char S[N];

int in[N], out[N], dfn; 
void dfs(int u) {
    in[u] = ++ dfn; 
    for(int i = 0; i < 26; i++)
    if(ch[u][i]) dfs(ch[u][i]);
    out[u] = dfn; 
}

struct ds {
    int n; 
    vector <pi> p; 
    vector <int> st[20]; 

    void ins(int x, int l) {
        p.pb({x, l});
    }
    void build() {
        sort(p.begin(), p.end());
        n = p.size(); 
        for(int i = 0; i < 20; i++)
            st[i].resize(n);
        for(int i = 0; i < n; i++) 
            st[0][i] = p[i].second; 
        for(int i = 1; i < 20; i++)
            for(int j = 0; j + (1 << i) - 1 < n; j++) 
                st[i][j] = min(st[i - 1][j], st[i - 1][j + (1 << (i - 1))]);
    }
    int qmn(int l, int r) {
        auto pl = lower_bound(p.begin(), p.end(), pi(l, 0)) - p.begin();
        auto pr = lower_bound(p.begin(), p.end(), pi(r + 1, 0)) - p.begin();
        // cout << "query " << l << ' ' << r << endl;
        // for(auto [x, l] : p) cout << x << ' ' << l << endl;
        // cout << pl << ' ' << pr << endl;
        if(pl >= pr) return -1; 
        int x = __lg(pr - pl);
        return min(st[x][pl], st[x][pr - (1 << x)]);
    }
    void clear() {
        p.clear();
        for(int i = 0; i < 20; i++) 
            st[i].clear();
        n = 0; 
    }
} t[M];

void Main() {
    scanf("%d%d", &n, &k);
    vector <int> a(n), le(n);
    for(int i = 0; i < n; i++) {
        scanf("%s", S);
        int len = strlen(S);
        int x = 0; 
        for(int j = 0; j < len; j++) {
            int c = S[j] - 'a';
            if(!ch[x][c]) ch[x][c] = ++ nd; 
            x = ch[x][c];
        }
        a[i] = x; 
        le[i] = len; 
    }
    dfs(0);

    for(int i = 0; i < n; i++)
        // cout << i << ' ' << a[i] << ' ' << in[a[i]] << ' ' << le[i] << endl,
        t[le[i] % k].ins(in[a[i]], le[i]);

    for(int i = 0; i < k; i++)
        t[i].build();

    scanf("%s", S);
    int m = strlen(S);
    vector <ll> f(m + 1, 1e18);
    f[0] = 0; 
    for(int i = 0; i < m; i++)
    if(f[i] < 1e18) {
        int x = 0; 
        for(int j = i; j < m; j++) {
            int c = S[j] - 'a';
            x = ch[x][c];
            if(x == 0) break;
            // in subtree of x
            int le = (j - i + 1) % k;  
            int len = t[le].qmn(in[x], out[x]);
            // cout << i << ' ' << j << ' ' << x << ' ' << len << endl;
            if(len != -1) {
                cmn(f[j + 1], f[i] + (len - (j - i + 1)) / k + 1); 
                // cout << f[j + 1] << ' ' << j + 1 << "FFF " <<endl;
            }
        } 
    }
    if(f[m] < 1e18) {
        cout << f[m] << '\n';
    }
    else {
        cout << -1 << '\n';
    }
    for(int i = 0; i <= nd; i++) {
        for(int j = 0; j < 26; j++)     
            ch[i][j] = 0; 
        in[i] = out[i] = 0; 
    }
    dfn = nd = 0; 
    for(int i = 0; i < k; i++)
        t[i].clear();
}

int main() {
    #ifdef zqj 
    freopen("1.in","r",stdin);
    #endif
    cin >> T; 
    while(T--) Main();
    return 0; 
}