Need help with regexp :)

ThEdGE · Post by **ThEdGE** » Sat Mar 23, 2002 2:39 pm

Got some problems with the damn regexp being a pain in the ass

Well hope someone can figure it out,
lets say we have a string:

"one two three four five six"

and i would like to have the word before "four" in var using regexp.

So that the new string will be "three",
the best i got was:

regexp {( ).*( four )} $string string

but this will return "two three"

Anyawy im clueless tried several combinations, but no luck. Hope anyone can help me out.

stdragon · Post by **stdragon** » Sat Mar 23, 2002 4:52 pm

set str "one two three four"
regexp {([^ ]*) four} $str total_match three

Now $total_match will be "three four" and $three will be "three"

But why do you want a regexp?

set three [lindex [split $str] 2]

ThEdGE · Post by **ThEdGE** » Sat Mar 23, 2002 6:13 pm

well the string i showed you was just a example.

The code is going to be used on strings that are not always the same but follow the same pattern within the string.

Anyhow thanks alot, works just fine

Appreciate it.

<font size=-1>[ This Message was edited by: ThEdGE on 2002-03-23 15:13 ]</font>