Tcl to look at the last occurance of a delimiter

[Rentian Huang]

Greeting Cloverleafers!!!

Can anyone provide a handy code to look at the last occurance of a delimiter?

Example:

Code:

Fluid-Restricted, 1500 ml-FR1500

There could be dashes within the description (Fluid-Restricted, 1500 ml) but I always want the last part (FR1500) delimited by “-“.

Thanks in advance!

Sam  8)

Topic

[Michael Hertel]

hcitcl>set data “Fluid-Restricted, 1500 ml-FR1500”

Fluid-Restricted, 1500 ml-FR1500

hcitcl>echo [lindex [split $data -] end]

FR1500

hcitcl>

If you know what your delimiter is always gonna be, it’s easy.

[Rentian Huang]

Exactly what I am looking for, thanks a bunch! I use this

Code:

string trim [lindex [split $data -] end]

to get rid of unexpected spaces too.

[Author]

Replies