Expect language separating two string connected by _(underscore)

Shell Programming and Scripting
1

Hi Folks,

Anybody has an idea how to split string based on separator _ (underscore) in Expect programming language?

e.g.if string is scmid1_scmid2 , i need to separate these two strings as scmid1 and scmid2.

Thanks in advance.
Sanket

2

prompt> tclsh
% set str "scmid1_scmid2"
scmid1_scmid2
% set lst [split $str "_"]
scmid1 scmid2
% puts [llength $lst]
2
% puts [lindex $lst 0]
scmid1
% puts [lindex $lst 1]
scmid2