This is my first go at tcl, so bear with me.
I'm having some problems with a regex function. If someone could take a look at it for me, I would be gratefull
The code is kind of long, so I won't paste it here. Take a look at pastebin for it
http://pastebin.ca/82855
Thanks again