В Tcl фигурные скобки аналогичны одинарным кавычкам оболочки. :Подстановка переменных не выполняется. Вам нужно изменить
var1={^$line}
# to
var1="^$line"
и аналогично для 2-го нед.
Однако я не понимаю, почему вы используете 2 awk в конвейере :похоже, вы хотите найти IP-адреса из policy-unique_single_line-src-dst-ip.txt
, которые появляются в столбце 1 канала -с разделителямиsort-address-name-ip.txt
:
set ips [exec cut {-d|} -f1 sort-address-name-ip.txt | grep -Fxf policy-unique_single_line-src-dst-ip.txt]