TCL глобальные переменные внутри ехес команды AWK

Question

Я хотел бы выполнить следующий сценарий AWK (который работает хорошо) в Tcl:

exec awk {$1=="text" {print $0}} temp1.txt > temp2.txt} 

НО проблема в том, что «текст» является пришедшей от ОК входа виджета и я должен поместить его в переменную ($ вар), который не распознается AWK:

set var [.entry get] 
exec awk {$1==$var {print $0}} temp1.txt > temp2.txt} 

Любая идея, как пропустить его или сделать это работает?

PS Я хотел бы остаться с awk, чтобы не менять код на tcl, если это возможно.

С уважением, Лукаса

Answer 1

Используйте -v переключатель в AWK передать внешнюю переменную AWK:

exec awk -v var=$var {$1==var {print $0}} temp1.txt > temp2.txt}