Объявление и использование функций

Expect позволяет программисту объявлять функции, используя ключевое слово proc:

proc myfunc { MY_COUNT } {

set MY_COUNT [expr $MY_COUNT + 1]

return "$MY_COUNT"

}

Вот как выглядит expect-скрипт, в котором используется объявленная в нём же функция:

#!/usr/bin/expect -f

proc myfunc { MY_COUNT } {

set MY_COUNT [expr $MY_COUNT + 1]

return "$MY_COUNT"

}

set COUNT 0

while {$COUNT <= 5} {

puts " COUNT is currently at $COUNT"

set COUNT [myfunc $COUNT]

}

puts ""

Функции в expect