免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 3879 | 回复: 4

如何在tcl脚本中调用expect脚本 [复制链接]

论坛徽章:
0
发表于 2007-10-08 16:21 |显示全部楼层
下面这样写好象不行:

#!/opt/bsmext/bin/tclsh

source ./test.exp

puts "for test purpose\n"

##test.exp脚本内容###

#!/opt/bsmext/bin/expect

spawn ftp 202.38.35.253

log_file test.log
log_user 1

expect "*leozhu):"
send "bsmbin\n"

expect "Password:"
send "abcde01\n"

expect "ftp>"
send "cd leozhu\n"

expect "ftp>"
send "get init\n"

expect "ftp>"
send "bye"

论坛徽章:
8
摩羯座
日期:2014-11-26 18:59:452015亚冠之浦和红钻
日期:2015-06-23 19:10:532015亚冠之西悉尼流浪者
日期:2015-08-21 08:40:5815-16赛季CBA联赛之山东
日期:2016-01-31 18:25:0515-16赛季CBA联赛之四川
日期:2016-02-16 16:08:30程序设计版块每日发帖之星
日期:2016-06-29 06:20:002017金鸡报晓
日期:2017-01-10 15:19:5615-16赛季CBA联赛之佛山
日期:2017-02-27 20:41:19
发表于 2007-10-08 17:14 |显示全部楼层
package require Expect
source ./test.exp

论坛徽章:
0
发表于 2007-10-08 17:16 |显示全部楼层
tcl 不理解 expect 的命令啊, 当然不行

论坛徽章:
0
发表于 2007-10-08 17:17 |显示全部楼层
干嘛要在 tcl 里调 expect 呢, expect 里面就可以直接用 tcl 的命令

论坛徽章:
0
发表于 2007-10-08 17:18 |显示全部楼层
原帖由 waker 于 2007-10-8 17:14 发表
package require Expect
source ./test.exp

这主意也不错, 不晓得 Expect 这个 package 是否总是 available?

[ 本帖最后由 dearvoid 于 2007-10-8 17:19 编辑 ]
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP