tcl script to remove \.br\

[Alison Benecchi]

I’m looking for a tcl script to remove the \.br\ and replace with a space in RXE7-1 but having problems with my script.  Looking for suggestions.

Here it is:

set RXE7_1 [getField $msg RXE7_1]
set Br “\.br\””
puts $Br

if {[cequal $RXE7_1 $Br]} {
set msg [setField $RXE7_1 $msg RXE7]
regsub -all {“\.br\”} $RXE7_1 { } RXE7_1
# lreplace $RXE.7 “\.br\” ” ”
}

 

 

Topic

[Vince Angulo]

Try an extra set of back slashes:  I use this statement to replace line breaks in entire segments:

 

regsub -all — {\\.br\\} $segid { } newseg

[Tipu Razaq]

we’ve done this in an xlate:

 

lset xlateOutVals 0 [regsub -all — {\\.br\\} [lindex $xlateInVals 0] ” “];

 

Perhaps you just have to escape the \ like so, remove the quotes, use ” ” for the space:

 

regsub -all {\\.br\\} $RXE7_1 ” ” RXE7_1

[Jim Kosloskey]

If your release has the STRING Action you can use that I think.

email: jim.kosloskey@jim-kosloskey.com 29+ years Cloverleaf, 59 years IT - old fart.

[David Barr]

Technically, you should say {\\\.br\\} so that the period will be a literal period rather than a special character. The pattern {\\.br\\} will also match \xbr\. You might be better off using “string map” for this replacement since it doesn’t need any special expression.

[Charlie Bursell]

I agree with Jim.  Use <code class=”ph codeph”>xlateStrMap ?nocase? mapping</code>

Same use as the string map command in Tcl

[Author]

Replies