Forum Discussion
Kevin_Stewart
Jul 07, 2015Employee
You can use a combination of string operations to get to this value. Try this:
set subj [findstr [X509::subject [SSL::cert 0]] "CN=" 3 ","]
set EDIPI [string range $subj [expr [string last "." $subj] +1] end]
The finsdtr command will return everything after "CN=" and before the next comma:
John.D.Smith.9999999999
And the string functions will return the value after the last period to the end of the string.