#include <bits/stdc++.h>
using namespace std;
const bool test=true;
const int maxn=1e5+10;
struct Trie{
    int trie[maxn][26],tot;
    int fa[maxn];
    int dep[maxn],f[21][maxn];
    void init(){
        for(int i=0;i<=tot;i++){
            memset(trie[i],0,sizeof(trie[i]));
            fa[i]=0;
            dep[i]=0;
            for(int j=0;j<=20;j++)f[j][i]=0;
        }
        tot=0;
    }
    queue<int> qu;
    int getkthfather(int x,int k){
        for(int i=20;i>=0;i--)if(k>>i&1)x=f[i][x];
        return x;
    }
};
Trie tri;
const int N = 2*maxn;//2*strlen
struct Suffix{
	int ht[N],rk[N],sa[N],y[N],c[N];
    int n,m;
    char s[N];
    int st[20][N];
	void init(){
        n=strlen(s+1);
        m=300;
		for(int i=0;i<=m;i++) c[i]=0;
		for(int i=0;i<=2*n;i++) y[i]=0;
		for(int i=1;i<=n;i++) c[rk[i]=s[i]]++;
		for(int i=1;i<=m;i++) c[i]+=c[i-1];
		for(int i=n;i>=1;i--) sa[c[rk[i]]--]=i;
		for(int k=1;k<=n;k<<=1){
			int p=0;
			for(int i=n-k+1;i<=n;i++) y[++p]=i;
			for(int i=1;i<=n;i++){
				if(sa[i]>k){
					y[++p]=sa[i]-k;
				}
			} 
			for(int i=0;i<=m;i++) c[i]=0;
			for(int i=1;i<=n;i++) c[rk[i]]++;
			for(int i=1;i<=m;i++) c[i]+=c[i-1];
			for(int i=n;i>=1;i--) sa[c[rk[y[i]]]--]=y[i];
			for(int i=0;i<=n;i++) swap(rk[i],y[i]);
			rk[sa[1]]=p=1;
			for(int i=2;i<=n;i++){
				rk[sa[i]]=(y[sa[i]] == y[sa[i-1]] && y[sa[i]+k] == y[sa[i-1]+k] ? p : ++p);
			}
			if(p>=n) break;
			m=p;
		}
		for(int i=1,k=0;i<=n;i++){
			if(k)k--;
			int j=sa[rk[i]-1];
			while(s[i+k] == s[j+k] )k++;
			ht[rk[i]] = k;
		}
        for(int i=1;i<=n;i++)st[0][i]=ht[i];
        for(int j=1;j<20;j++){
            for(int i=1;i+(1<<j)-1<=n;i++)st[j][i]=min(st[j-1][i],st[j-1][i+(1<<(j-1))]);
        }
	}
    int get(int l,int r){
        int g=__lg(r-l+1);
        return min(st[g][l],st[g][r-(1<<g)+1]);
    }
    int lcp(int x,int y){
        x=rk[x],y=rk[y];
        if(x==y)return n-x+1;
        if(x>y)swap(x,y);
        return get(x+1,y);
    }
    int query(int l1,int r1,int l2,int r2){
        int len=lcp(l1,l2);
        len=min({len,r1-l1+1,r2-l2+1});
        if(len==min(r1-l1+1,r2-l2+1)){
            if(r1-l1>r2-l2)return 1;
            if(r1-l1<r2-l2)return -1;
            if(r1-l1==r2-l2)return 0;
        }
        char p=s[l1+len],q=s[l2+len];
        if(p>q)return 1;
        if(p==q)return 0;
        return -1;
    }
    void writ()
    {
        printf("%s\n",s+1);
        for(int i=1;i<=n;i++)cout<<sa[i]<<" ";;cout<<"\n";
        for(int i=1;i<=n;i++)cout<<ht[i]<<" ";;cout<<"\n";
        for(int i=1;i<=n;i++)cout<<rk[i]<<" ";;cout<<"\n";
    }

};
Suffix suf;
void solve()
{
    int n,m,q;
    cin>>n>>m>>q;
    tri.init();
    tri.tot=n;
    for(int i=1;i<=n;i++){
        int fa;char c;
        cin>>fa>>c;
        tri.trie[fa][c-'a']=i;
        tri.f[0][i]=fa;
        for(int j=1;j<=20;j++)tri.f[j][i]=tri.f[j-1][tri.f[j-1][i]];
    }
    string s;cin>>s;s="0"+s;
    for(int i=1;i<=m;i++)suf.s[i]=s[i];
    suf.s[m+1]=0;
    suf.init();
    vector<int> nxt(m+2,m),endp(m+2,-1);
    set<int> se;
    for(int i=1;i<=m;i++){
        int rk=suf.rk[i];
        int len=0,p=0;
        auto it=se.lower_bound(rk);
        if(it!=se.end()){
            int id=suf.sa[*it];
            int l=min(nxt[id]-id,suf.lcp(id,i));
            if(l>len){
                len=l;
                p=tri.getkthfather(endp[id],nxt[id]-id-l);
            }
        }
        if(it!=se.begin()){
            it=prev(it);
            int id=suf.sa[*it];
            int l=min(nxt[id]-id,suf.lcp(id,i));
            if(l>len){
                len=l;
                p=tri.getkthfather(endp[id],nxt[id]-id-l);
            }
        }
        // cout<<"i="<<i<<" len="<<len<<endl;
        for(int j=len;i+j<=m+1;j++){
            if(i+j==m+1||tri.trie[p][s[i+j]-'a']==0){
                nxt[i]=i+j;
                endp[i]=p;
                break;
            }
            else{
                p=tri.trie[p][s[i+j]-'a'];
            }
        }
        se.insert(rk);
    }
    // if(test){cout<<"nxt :";for(int i=1;i<=m;i++)cout<<nxt[i]<<" \n"[i==m];}
    // if(test){cout<<"endp :";for(int i=1;i<=m;i++)cout<<endp[i]<<" \n"[i==m];}
    vector<vector<int>> f(21,vector<int>(m+2,m+1));
    for(int i=m;i>=1;i--){
        f[0][i]=nxt[i];
        for(int j=0;j<=19;j++)
            f[j+1][i]=f[j][f[j][i]==m+1?m+1:f[j][i]+1];
    }
    while(q--){
        int l,r;cin>>l>>r;
        int ans1=0;
        for(int i=20;i>=0;i--)if(f[i][l]<=r){
            ans1+=(1<<i);
            l=f[i][l]+1;
            // cout<<"i="<<i<<" ans1="<<ans1<<" l="<<l<<endl;
        }
        int d=nxt[l]-1-r,p=endp[l];
        for(int i=20;i>=0;i--)if(d>>i&1)p=tri.f[i][p];
        cout<<ans1<<" "<<p<<"\n";
    }
}
int main()
{
    ios::sync_with_stdio(false);
    cin.tie(0);
    int T;cin>>T;while(T--)solve();
    return 0;
}