Posted to tcl by miguel at Tue May 31 13:19:58 GMT 2011view raw

  1. % set x {^" \"}
  2. ^" \"
  3. % set y $x|foo
  4. ^" \"|foo
  5. % string match $x* $y
  6. 0
  7. % string map [list $x {}] $y
  8. |foo

Comments

Posted by miguel at Tue May 31 13:26:14 GMT 2011 [text] [code]

Just being stupid: \ is special in patterns ...