真实的国产乱ⅩXXX66竹夫人,五月香六月婷婷激情综合,亚洲日本VA一区二区三区,亚洲精品一区二区三区麻豆

成都創(chuàng)新互聯(lián)網(wǎng)站制作重慶分公司

expect的基礎(chǔ)用法

本篇內(nèi)容介紹了“expect的基礎(chǔ)用法”的有關(guān)知識,在實際案例的操作過程中,不少人都會遇到這樣的困境,接下來就讓小編帶領(lǐng)大家學(xué)習(xí)一下如何處理這些情況吧!希望大家仔細閱讀,能夠?qū)W有所成!

成都創(chuàng)新互聯(lián)公司長期為成百上千家客戶提供的網(wǎng)站建設(shè)服務(wù),團隊從業(yè)經(jīng)驗10年,關(guān)注不同地域、不同群體,并針對不同對象提供差異化的產(chǎn)品和服務(wù);打造開放共贏平臺,與合作伙伴共同營造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為郎溪企業(yè)提供專業(yè)的成都網(wǎng)站設(shè)計、做網(wǎng)站,郎溪網(wǎng)站改版等技術(shù)服務(wù)。擁有10余年豐富建站經(jīng)驗和眾多成功案例,為您定制開發(fā)。

以下是一個可以使用的腳本 。在這種交互式的應(yīng)用中,經(jīng)常需要用到休眠函數(shù),這樣可以對輸出的界面顯示更加友好,而且也可能盡量多的減少 錯誤的出現(xiàn)

關(guān)于轉(zhuǎn)義字符,網(wǎng)上存在一部分,本例中用到來-號需要轉(zhuǎn)義,轉(zhuǎn)義是用兩個\來轉(zhuǎn)義。

\ 需轉(zhuǎn)義為 \\\

} 需轉(zhuǎn)義為 \}

[ 需轉(zhuǎn)義為 \[

$ 需轉(zhuǎn)義為 \\\$

` 需轉(zhuǎn)義為 \`

" 需轉(zhuǎn)義為 \\\"

可以用log_user 0或1實現(xiàn)輸出屏蔽和顯示

log_file test.log   #記錄log。追加

expect遵循的是tcl語法。這是一種標準。有時間可以參考學(xué)習(xí)。

#!/usr/bin/expect -f

set timeout -1#永不超時

set deviceType [lindex $argv 0]

set writesize  [lindex $argv 1]  #設(shè)置輸入變量

set i 0  #設(shè)置變量

log_file test.log   #記錄log。

#log_file -noappend rtime_md_test_${stationNum}_[clock format $currenttime -format %m%d%H].log

spawn   /home/redhat/Downloads/Mitsubishi/Latest/Driver/Sample/md_test

expect {

"menu No"     {exp_send "1\r" ;exp_continue} 

"ChanelNo"    {exp_send "151\r"}

}

expect {

"mode = "     {exp_send "\\-1\r"}  #這里比較坑爹,害我查了很久很久,最后試出來的

}

while {$i<10} {                 #循環(huán)語法使用

#寫入數(shù)據(jù)部分

expect {

"menu No" {exp_send "11\r"}

}

#exec sleep 1

expect {

"StationNo" {exp_send "255\r"}

}

exec sleep 0.01         #休眠時間可以是小數(shù) 

expect {

"NetworkNo" {exp_send "1\r"}

}

exec sleep 0.01

expect {

"DeviceType" {exp_send "$deviceType\r"}

}

exec sleep 0.01

expect "DeviceNo.(or ChannelNo.)" {exp_send "0\r"}

exec sleep 0.01

expect "WriteSize"  {exp_send "$writesize\r"}

exec sleep 0.01

expect "WriteDataType" {exp_send "2\r"}

#讀取數(shù)據(jù)部分

exec sleep 0.1

expect "menu No."  {exp_send "12\r"}

exec sleep 0.01

expect {

"StationNo" {exp_send "255\r"}

}

exec sleep 0.01

expect {

"NetworkNo" {exp_send "1\r"}

}

exec sleep 0.01

expect {

"DeviceType" {exp_send "$deviceType\r"}

}

exec sleep 0.01

expect "DeviceNo.(or ChannelNo.)" {exp_send "0\r"}

exec sleep 0.01

expect "ReadSize"  {exp_send "$writesize\r"}

incr i

}

expect "menu No" {exp_send "0\r"}

expect eof

expect的基礎(chǔ)用法

expect語法基礎(chǔ): while、for 循環(huán)、if 語句的用法示例

==兩種for循環(huán)的寫法
for {set i 0} {$i<=10} {incr i} {#i默認增量是1,即等價incr i 1。注意這個反括號一定要寫在這行行末:args: should be "for start test next command"
............
.............}

Q:能不能改為i為我指定的幾個數(shù)就好。比如我指定i為 3 5 6 7 9這幾個數(shù)? 謝謝。
foreach  i { 1 3 5 7 9 } {
    puts "$i"
} 注:expect 用的是tcl語法,不是shell語法,或者用switch
==for/while循環(huán)寫法
    [15:33:05-Bob@hzling08:~/test/tcl]-(1109)No.108->$ cat tclfor.test
    #!/usr/bin/expect --
    #                  http://bbs.chinaunix.net/thread-2301733-1-1.html
    # for Bob testing
    #
    puts "---1---"
    for {set i 0} {$i < 10} {incr i} {
        puts "I inside first loop: $i"
    }

    puts "---2---"
    for {set i 3} {$i < 2} {incr i} {
        puts "I inside second loop: $i"
    }

    puts "---3---"
    puts "Start"
    set i 0
    while {$i < 10} {
        puts "I inside third loop: $i"
        incr i
        puts "I after incr: $i"
    }     set i 0
    incr i
    puts "---4---"
    puts "$i"
    # This is equivalent to:
    set i [expr {$i + 1}]    #expect里的加減法
    puts "---5---"
    puts "$i"

運行:

    [15:33:09-Bob@hzling08:~/test/tcl]-(1110)No.109->$ ./tclfor.test

 ===if的寫法

    if { $sync_flag == "true" } {

            puts "Sync start at [clock format [clock seconds]]"

            catch {eval exec ${TOOL_HOME}/bin/${sync_cmd} ${sync_parm} } output
            puts $output
            if { $output eq "SYNC complete!" } {
                    puts "SYNC complete!"
            } else {
                    puts "SYNC error!"
                    exit 1
            }

            puts "Sync end at [clock format [clock seconds]]"
    }
===ping的例子
set p_loop 5
while { $p_loop } {
    send_user "\nStpe 1 Ping to server..."
    set timeout 60
    send "ping 10.1.1.1 -c5\r"

    expect {

        "64 bytes" {
            send_user "ok"
            set p_loop 0
        }
     
        timeout {
            set p_loop [expr $p_loop-1]  #expect里的加減法
            send_user "failed.\n"
        }
        eof {
            send_user "ping 10.1.1.1 -c5 FAIL\n"
            exit 1
        }
}
===expect讀取文件的例子
#!/usr/bin/expect --

#            http://scmbob.org/counting_file_lines.html

#open a file
set fd [open "/home/xiabao/myfile.txt" r]
set number 0

# read each line
while { [gets $fd line] >= 0 } { incr number }
puts "Number of lines: $number"

close $fd

“expect的基礎(chǔ)用法”的內(nèi)容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識可以關(guān)注創(chuàng)新互聯(lián)網(wǎng)站,小編將為大家輸出更多高質(zhì)量的實用文章!


當(dāng)前文章:expect的基礎(chǔ)用法
網(wǎng)站地址:http://weahome.cn/article/jgdejp.html

其他資訊

在線咨詢

微信咨詢

電話咨詢

028-86922220(工作日)

18980820575(7×24)

提交需求

返回頂部