Chinaunix首页 | 论坛 | 博客
  • 博客访问: 2068076
  • 博文数量: 178
  • 博客积分: 2076
  • 博客等级: 大尉
  • 技术积分: 2800
  • 用 户 组: 普通用户
  • 注册时间: 2008-01-10 10:50
文章分类

全部博文(178)

文章存档

2010年(4)

2009年(13)

2008年(161)

我的朋友

分类: LINUX

2008-09-12 10:36:05

A. Tcl 安装
主页:
下载地址:

1.下载源码包
wget
wget

2.解压缩源码包
tar xfvz tcl8.4.11-src.tar.gz
tar xfvz tk8.4.11-src.tar.gz

3.安装配置
cd tcl8.4.11
cd unix
./configure --prefix=/usr/tcl --enable-shared
make
make install

安装完毕以后,进入tcl源代码的根目录,把子目录unix下面的tclUnixPort.h copy到子目录generic中。
暂时不要删除tcl源代码,因为expect的安装过程还需要用。

B. expect 安装 (需Tcl的库)
主页:

1.下载源码包
wget

2.解压缩源码包
tar xfvz expect.tar.gz

3.安装配置
cd expect-5.43
./configure --prefix=/usr/expect --with-tcl=/usr/tcl/lib  --with-tclinclude=
/tcl源代码路径/generic

make
make install




#!/usr/expect/bin/expect
spawn /usr/bin/passwd [lindex $argv 0]
set password [lindex $argv 1]
expect "*UNIX password:"
#sleep .1
send "$password\n"
expect "*new UNIX password:"
send "$password\n"
expect eof

./ex.sh username pw

阅读(288) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~