JSON WS response

Looking for a little assistance with developing a TCL script to code a response to a HTTP WS POST into Cloverleaf back to the sender with a JSON body ACK of “It Worked” or something like that and not sure where to start. If anyone has an example of one that has worked for them that’d be appreciated.