Forum Discussion
Stanislas_Piro2
Nov 20, 2017Cumulonimbus
set str "XXX-GHDF-12XD45"
set sub_str [string range $str [string last "-" $str]+1 end]
or
set str "XXX-GHDF-12XD45"
set sub_str [lindex [set str_list [split $str "-"]] [llength $str_list]-1]