Word Replacement Question / TCL

Hi. I have an interesting question about replacing a certain word in a file with a number. I have done searches by segment and used regsub to substitute characters before but the document I am trying to replace these words in are not structured in any certain way.

Here is random example I mocked up. I need to walk through a document that looks likes this (but much longer):

RE*LL*REPLACEMENT*RECVID*ISL*01*

ISA*00*

AH*2*222

And replace the word REPLACEMENT with 54789612 so it would look like:

RE*LL*54789612*RECVID*ISL*01*

ISA*00*

AH*2*222

So it isn’t valid HL7, and the REPLACEMENT word can be in the document anywhere and any number of times. Essentially I want to automate a FIND AND REPLACE using TCL or any other function in Cloverleaf. Any thoughts? I don’t think a regsub will work for the whole document will it?

Thank you in advance