#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; 
}
void cmn(int &x, int 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, m; 
char S[N];

vector <int> p[N];
ll e[M][M];


int norm(int x) {
    return x >= k ? x - k : 0;
}
void work(vector <ll> &F, vector <ll> d) {
    F[0] = 0; 
    for(int i = 1; i < k; i++) 
    if(d[i] < 1e18) {
        int gcd = std::__gcd(i, k);
        for(int x = 0;x < gcd;++x) {
            int N = k / gcd;
            int u = x;
            
            for(int cc = 0;cc < N * 2;++cc) {
                int v = u + i;
                if(v >= k) {
                    v -= k;
                    cmn(F[v], F[u] + d[i] + 1);
                } else {
                    cmn(F[v], F[u] + d[i]);
                }
                u = v;
            }
        }
    }
}

int a[N], le[N];

ll calc(int x, int d, cs vector <ll> &F) {
    ll ans = 1e18;
    for(auto c : p[x]) {
        // le[c] - > d 
        int dlt = le[c] - d; 
        ll w = dlt / k; 
        dlt -= w * k; 
        if(dlt) w += F[k - dlt] + 1;
        cmn(ans, w);
    }
    return ans + 1; 
}

void Main() {
    scanf("%d%d", &n, &k);
    vector <ll> d(k + 1, 1e18); 
    d[k] = 1; 
    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];
            p[x].pb(i);
        }
        a[i] = x; 
        le[i] = len; 
        cmn(d[len % k], (ll) len / k + 1);
    }

    vector <ll> F(k + 1, 1e18);
    work(F, d);

    scanf("%s", S);
    m = strlen(S);

    for(int i = 0; i <= m; i++)
    for(int j = i; j <= m; j++)
    e[i][j] = 1e18; 

    vector <ll> ans(nd + 1, -1);
    for(int i = 0; i < m; i++) {
        int x = 0; 
        for(int j = i; j < m; j++) {
            int c = S[j] - 'a';
            x = ch[x][c];
            if(x == 0) break;
            if(ans[x] == -1) {
                ans[x] = calc(x, j - i + 1, F);
            }
            e[i][j + 1] = ans[x];
        } 
    }
    vector <ll> dp(m + 1, 1e18);
    dp[0] = 0; 
    for(int i = 1; i <= m; i++) {
        for(int j = 0; j < i; j++)
            cmn(dp[i], dp[j] + e[j][i]);
    }
    if(dp[m] < 1e18) {
        cout << dp[m] << '\n';
    }
    else {
        cout << -1 << '\n';
    }
    for(int i = 0; i <= nd; i++) {
        for(int j = 0; j < 26; j++)     
            ch[i][j] = 0;
        p[i].clear();
    }
    nd = 0; 
}

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