replace every "*" in string

[BCyo+8C4]

Hi,
I'm keeping the channels banlist in a text file but got a problem removing the entries from that file as I can't figure out how to escape the asterisks.

sed expects every "*" and "!" to be escaped like "\*" and "\!"

What's the easiest way to replace _every_ "*" with "\*" in a given string? (Replacing just one isn't a problem, but for 5 my code had around 50 lines and is fugly)

[nml375]

Regsub with a regular expression:

Code: Select all

set maskedString [regsub -all -- {\*|!} $oldString {\\\0}]

[BCyo+8C4]

doesn't work
Tcl error [delban]: wrong # args: should be "regsub ?switches? exp string subSpec varName"
Entered the command exactly like you said, only changed the variable names:

Code: Select all

set maskedString [regsub -all -- {\*|!} $mask {\\\0}]

also tried with just "{\*}" as expression but that failed as well.

[nml375]

That's odd... which version of tcl are you using?
Most versions of tcl have the varName argument optional. Nevertheless, try using something like this instead then:

Code: Select all

regsub -all -- {\*|!} $mask {\\\0} maskedString

[BCyo+8C4]

nvm, just figured it out:

Code: Select all

regsub -all {\*|!} $mask {\\\0} mask