Help with algorithm in XML tps preproc

This topic has 4 replies, 2 voices, and was last updated 14 years, 4 months ago by Bob Moriarty.

Creator

Topic
August 18, 2010 at 5:23 pm #51939
Bob Moriarty
Participant
I want to convert inter-tag “<" character(s) to the string "less than". For example, convert

Code: 123 < x

to

Code: 123 less than x

Also, on “tagless” lines, convert

Code: qwe < asd

to

Code: qwe less than asd

And, to raise the difficulty level a bit, convert

Code: qwe < asd < zxc

to

Code: qwe less than asd less than zxc

I’m pretty comfortable with tps preprocs but I’m having trouble coming up with a simple algorithm to make this substitution in tcl.

TIA
Creator

Topic

Viewing 3 reply threads

Author

Replies
- August 18, 2010 at 6:33 pm #72401
  Jim Kosloskey
  Participant
  Bob,
  
  How about
  
  set var [string map
  email: jim.kosloskey@jim-kosloskey.com 29+ years Cloverleaf, 59 years IT - old fart.
- August 18, 2010 at 6:47 pm #72402
  Bob Moriarty
  Participant
  Jim,
  
  You wrote
  
  ~~Quote:~~
  
  set var [string map
  That hangs
  
  Code: tcl>set var ” qwe < asd ” qwe < asd tcl>set var [string map [list ” < " : less than "] $var
  
  This also hangs:
  
  Code: tcl>set var ” qwe < asd ” qwe < asd tcl>set var [string map [list ” < " " less than "] $var
- August 18, 2010 at 6:59 pm #72403
  Jim Kosloskey
  Participant
  Bob,
  
  My typo with the : and missing the ending square bracket should be:
  
  set var [string map
  email: jim.kosloskey@jim-kosloskey.com 29+ years Cloverleaf, 59 years IT - old fart.
- August 18, 2010 at 7:27 pm #72404
  Bob Moriarty
  Participant
  Thanks Jim.
  
  Short and sweet! 😀
  
  I should have caught the missing bracket. I over-focused on the : 😯
Author

Replies

Viewing 3 reply threads

The forum ‘Cloverleaf’ is closed to new topics and replies.