☰

Expect 스크립트의 send 명령에서 변수 값을 보내는 방법

tag-icon • tag-icon expect
Expect 스크립트의 send 명령에서 변수 값을 보내는 방법

아래는 내 스크립트입니다

proc sendline {line} { send -- "$line\r" }

set slot 1
set port 1
for {set x 0} {$x<48} {incr x} {
   sendline {curl -X POST -d '{"command":"dumpcommand","slot": "$slot","port": "$port"}' http://127.0.0.1:7777/api/test}

   expect -exact "OK"
   sleep 2
   incr slot
   incr port
}

슬롯과 포트를 1,2로 교체하고 싶습니다....예:

curl -X POST -d '{"command":"dumpcommand","slot": "1","port": "1"}' http://127.0.0.1:7777/api/test

답변1

Tcl의 중괄호는 쉘의 작은따옴표와 같습니다. 변수 대체를 방지합니다.http://www.tcl-lang.org/man/tcl8.6/TclCmd/Tcl.htm

당신은해야합니다

sendline "curl -X POST -d '{\"command\":\"dumpcommand\",\"slot\": \"$slot\",\"port\": \"$port\"}' http://127.0.0.1:7777/api/test"

모든 따옴표를 이스케이프하는 데 문제가 있으면 formatTcl의 printf를 사용하십시오.

sendline [format {curl -X POST -d '{"command":"dumpcommand","slot": "%s","port": "%s"}' http://127.0.0.1:7777/api/test} $slot $port]

관련 정보