Lets say I have a small list of numbers converted to digits

p={{1,3,9,8,5,4,2,7,6},{1,5,2,8,4,3,7,6,9},{1,5,7,3,2,6,8,4,9}}

and I also have 2 Words say txt2={INTRODUCE,REDUCTION}

I want to map the first set of digits to the first word so

Thread[Characters[txt2[[1]]] -> p[[1]]]

gives me

 {I->1,N->3,T->9,R->8,O->5,D->4,U->2,C->7,E->6}

I now wish to map those back to see what REDUCTION in digits would be i.e.

REDUCTION = 864279153

and repeat for the other digits sets in list p

The Thread function seems to go part way but can't see how to reverse the process any help would be much appreciated.

Paul.