reemplazo de cadena tcl

$arg=TEST #### Requested, NOT AVAILABLE psy #;

Tengo una cadena arriba donde el # se genera dinámicamente. Tengo que usar una función en tcl para hacer un reemplazo de cadena. Básicamente, necesito eliminar la coma (,) de la expresión anterior y mostrarla como

TEST #### solicitado NO DISPONIBLE psy #

Esto es lo que hice, pero no está funcionando.

regsub -all {"Requested,"} $arg {"Requested"} arg

Aquí es donde hice referencia a la función de:http://www.tcl.tk/man/tcl8.5/TclCmd/regsub.htm