2 lines
84 B
Tcl
2 lines
84 B
Tcl
set theString = "I am a string"
|
|
puts [regsub -- { +a +} $theString { another }]
|
set theString = "I am a string"
|
|
puts [regsub -- { +a +} $theString { another }]
|