Regular Expression Problem

[Deanna Norman]

Hi,

I am trying to use the regsub function to strip out the rtf formatting using the regular expression \w+|{.*?}

The above regular expression works fine in a test app I wrote using .NET, but not in TCL. Can anybody see why? My statement is below:

regsub -all \w+|{.*?} $OBX5 “” CleanOBX5

I get no value in the variable $CleanOBX5

Thanks,

Topic

[Max Drown (Infor)]

In tcl, it’s a good idea to wrap your regexps in braces.

Code:

regsub -all {…} $var1 {} var2

Try this …

Code:

regsub -all {w+|{.*?} $OBX5 {} CleanOBX5

I’m assuming your using the “|” as “or”. If not, you will need to escapte it with | like you did with the braces.

Code:

regsub -all {w+|{.*?} $OBX5 {} CleanOBX5

-- Max Drown (Infor)

[Author]

Replies