以下のスクリプトを実行しています。
#!/usr/bin/expect -f
#!usr/bin/expect
package require Expect
spawn telnet $serverName $portNum
expect "TradeAggregator>"
send "Clients\r"
expect "Client:"
send "1\r"
expect "1-Client>"
send "Pollers\r"
expect "Client Pollers"
send "2\r"
これらの行を実行した後:
send "Pollers\r"
expect ">"
CMD出力で次の行を下回っています:
"Client" Pollers
1) "ICTS_ICEFIX_Worker Worker" (ICTS_ICEFIX_Worker Poller): RUNNING
2) "NYMEX UTBAPI Worker" (NYMEX UTBAPI Poller): STOPPED
ここでは、上記の出力を 1 つの変数に格納します。次に、行ごとに読み取りたいのですが、行にNYMEX
単語が含まれている場合は、この例の最初の数字 (1) をフェッチし、部分文字列メソッドを実行して文字列をカットする必要があります。
これを tcl スクリプトで取得するにはどうすればよいですか?