string range

[cvanmeer]

Hi all, just a small question

let's say I have a string: "xxxxxx.xxx"
and I want to loose the .xxx (always the last 4 characters) and I want to make the first x of the string an uppercase X so you would have:

"Xxxxxx"

I've tried it with string range but it didn't work out.

Could somebody write me the line I need?
thx.

Chrizz

[cvanmeer]

solved it already

Code: Select all

     set mapvol [lindex $row 4]
     set mapstrip [string range $mapvol 0 [expr [strlen $mapvol]-5]]
     set map1 [string toupper [string range $mapstrip 0 0]]
     set map2 [string range $mapstrip 1 end]
     set map $map1$map2

[arcane]

2 remarks:
1. you are using list commands on a string
2. you could just split on "."

like:

Code: Select all

set string [lindex [split $input "."] 0]

to get your first xxxxx
then make the first x upper case (don't know a better way than the one you are using )

[caesar]

or string trim to remove the .xxxx