Получить поле из строки, сохранить его в переменной и сравнить его

Question

У меня есть

From: "1234"<sip:1234@8.43.33.101;x-j1;x-refci=27684157;x-just1=S58>;tag=4834BAF1

Я хочу скопировать x-j1;x-refci=27684157;x-just1=S58 сверху From заголовок и сохранить его в переменной скажем s1 и сравнить с s2 (которая является другой переменной, содержащейаналогичная строка).

Answer 1

Вы можете использовать регулярное выражение: захватить текст между первой точкой с запятой и конечной угловой скобкой:

set str {From: "1234"<sip:1234@8.43.33.101;x-j1;x-refci=27684157;x-just1=S58>;tag=4834BAF1}
regexp -- {.*?;(.+)>} $str all wanted
puts $wanted ; # => x-j1;x-refci=27684157;x-just1=S58

или использовать поиск соответствующей подстроки

set start [string first {;} $str]
set end [string first {>} $str]
set wanted [string range $str $start+1 $end-1]