// what is matter? never mind. 
#pragma GCC optimize("Ofast")
#pragma GCC optimize("unroll-loops")
//#pragma GCC target("sse,sse2,sse3,sse4,popcnt,abm,mmx,avx,avx2") 
#include<bits/stdc++.h>
#define For(i,a,b) for(int i=(a);i<=(b);++i)
#define Rep(i,a,b) for(int i=(a);i>=(b);--i)
#define ll long long
#define ull unsigned long long

using namespace std;
inline int read()
{
    char c=getchar();int x=0;bool f=0;
    for(;!isdigit(c);c=getchar())f^=!(c^45);
    for(;isdigit(c);c=getchar())x=(x<<1)+(x<<3)+(c^48);
    if(f)x=-x;return x;
}

#define fi first
#define se second
#define pb push_back
#define mkp make_pair
typedef pair<int,int>pii;
typedef vector<int>vi;
 
#define maxn 1000005
#define inf 0x3f3f3f3f

#define int long long
const ll P=2305843009213693951;
 
ull red(__int128 x) {
  ll v = (ull)(x & P) + (ull)(x >> 61) - P;
  return v + (P & (v >> 63));
}
inline ll mul(ll x,ll y){
//	return red((__int128)x*y);
	return (__int128)x*y%P;
	ll s=x*y-(ll)((long double)x*y/P)*P;
	if(s<0)return s+P;
	return (s<P?s:s-P);
}
//ll qpow(ll a,ll b){
//	ll c=1;
//	for(;b;b>>=1,a=mul(a,a))if(b&1)c=mul(c,a);
//	return c;
//}
 
#define mod P
struct modint{
	ll x;
	modint(ll o=0){x=o;}
	modint &operator = (ll o){return x=o,*this;}
	modint &operator +=(modint o){return x=x+o.x>=mod?x+o.x-mod:x+o.x,*this;}
	modint &operator -=(modint o){return x=x-o.x<0?x-o.x+mod:x-o.x,*this;}
	modint &operator *=(modint o){return x=mul(x,o.x),*this;}
	modint &operator ^=(ll b){
		modint a=*this,c=1;
		for(;b;b>>=1,a*=a)if(b&1)c*=a;
		return x=c.x,*this;
	}
	modint &operator /=(modint o){return *this *=o^=mod-2;}
	friend modint operator +(modint a,modint b){return a+=b;}
	friend modint operator -(modint a,modint b){return a-=b;}
	friend modint operator *(modint a,modint b){return a*=b;}
	friend modint operator /(modint a,modint b){return a/=b;}
	friend modint operator ^(modint a,ll b){return a^=b;}
	friend bool operator ==(modint a,ll b){return a.x==b;}
	friend bool operator !=(modint a,ll b){return a.x!=b;}
	bool operator ! () {return !x;}
	modint operator - () {return x?mod-x:0;}
	bool operator <(const modint&b)const{return x<b.x;}
};
inline modint qpow(modint x,ll y){return x^y;}
 
const modint B=1145141919,ivB=modint(1)/B;
 
modint _w[maxn*2],*w=_w+maxn;
void init(int n){
	w[0]=1;
	For(i,1,n)w[i]=w[i-1]*B,w[-i]=w[-i+1]*ivB;
}
#undef int

int n,m;
int resa[maxn],resb[maxn];
string a[maxn],b[maxn];
vector<modint>pa[maxn],pb[maxn],sa[maxn],sb[maxn];

void work(string&s,vector<modint>&h1,vector<modint>&h2){
	h1.resize(m);
	h2.resize(m);
	For(i,0,m-1){
		if(i)h1[i]=h1[i-1]*B+s[i];
		else h1[i]=s[i];
	}
	Rep(i,m-1,0){
		if(i!=m-1) h2[i]=h2[i+1]+s[i]*w[m-1-i];
		else h2[i]=s[i];
	}
}

ll tmpa[maxn],tmpb[maxn],tt[maxn*4],len;
int cnt[maxn*4];
vi va[maxn*2],vb[maxn*2];
bool chk0(){
	For(i,1,n){
		tmpa[i]=pa[i].back().x;
		tmpb[i]=pb[i].back().x;
		tt[++len]=tmpa[i];
		tt[++len]=tmpb[i];
	}
	sort(tt+1,tt+len+1),len=unique(tt+1,tt+len+1)-tt-1;
	#define V(x) lower_bound(tt+1,tt+len+1,x)-tt
	
	For(i,1,len)cnt[i]=0,va[i].clear(),vb[i].clear();
	For(i,1,n){
		tmpa[i]=V(tmpa[i]);
		tmpb[i]=V(tmpb[i]);
		++cnt[tmpa[i]];
		--cnt[tmpb[i]];
	}
	For(i,1,len)if(cnt[i])return 0;
	For(i,1,n){
		va[tmpa[i]].pb(i);
		vb[tmpb[i]].pb(i);
	}
	int idx=0;
	For(i,1,len){
		while(va[i].size() && vb[i].size()){
			++idx;
			resa[idx]=va[i].back(),va[i].pop_back();
			resb[idx]=vb[i].back(),vb[i].pop_back();
		}
	}
	For(i,1,n)cout<<resa[i]<<" ";cout<<"\n";
	For(i,1,n)cout<<resb[i]<<" ";cout<<"\n";
	return 1;
}

int deg[maxn*4];
vector<pii>e[maxn*4];

void work()
{
	n=read(),m=read();
	For(i,1,n)cin>>a[i];
	For(i,1,n)cin>>b[i];
	For(i,1,n)work(a[i],pa[i],sa[i]),work(b[i],pb[i],sb[i]);
	if(chk0())return;
	For(j,1,m-1){
		len=0;
		For(i,1,n){
			tt[++len]=pa[i][j-1].x;
			tt[++len]=sa[i][j].x;
			tt[++len]=pb[i][m-j-1].x;
			tt[++len]=sb[i][m-j].x;
		}
		sort(tt+1,tt+len+1),len=unique(tt+1,tt+len+1)-tt-1;
		if(len>2*n)continue;
		
		For(i,1,len*2) e[i].clear(),deg[i]=0;
		
		For(i,1,n){
			int u=V(pa[i][j-1].x),v=V(sa[i][j].x);
			e[u].pb(mkp(v+len,i));
			++deg[u],--deg[v+len];
			u=V(pb[i][m-j-1].x),v=V(sb[i][m-j].x);
			e[u+len].pb(mkp(v,i));
			++deg[u+len],--deg[v];
		}
		bool ok=1;
		For(i,1,len*2){
			if(deg[i]){
				ok=0;
				break;
			}
		}
		if(!ok)continue;
		
		vector<pii> rec;
		function<void(int)>dfs=[&](int u){
			while(e[u].size()){
				auto [v,w]=e[u].back();
				e[u].pop_back();
				dfs(v);
				rec.pb(mkp(u,w));
			}
		};
		For(i,1,len*2)
			if(e[i].size()){
				dfs(i);
				break;
			}
		if(rec.size()!=n*2)continue;
		reverse(rec.begin(),rec.end());
		
		int idxa=0,idxb=0;
		for(auto [u,x]:rec){
			if(u<=len) resa[++idxa]=x;
			else resb[++idxb]=x;
		}
		For(i,1,n)cout<<resa[i]<<" ";cout<<"\n";
		For(i,1,n)cout<<resb[i]<<" ";cout<<"\n";
		return;
	}
	
	puts("-1");
}

signed main()
{
	init(1000001);
	int T=read();
	while(T--)work();
	return 0;
}
/*
4
4 3
aaa
aaa
bbb
ccc

abb
bcc
caa
aaa

3
3 3
abc
ghi
def
bcd
efg
hia
1 3
abc
def
3 3
abc
ghi
def
ghi
def
abc
*/