方式一：
1.安裝相關依賴包
yum install -y tcl tclx tcl-devel
yum -y install expect
2.腳本 scp.sh
#!/usr/bin/expect
#獲取輸入參數
set f1 [lindex $argv 0]
set f2 [lindex $argv 1]
set dir [lindex $argv 2]
spawn scp /var/log/usermonitor/$f1 USER@IP:/apprun/test/$dir
expect "*password*"
send "$PASSWD\n"
sleep 1
spawn scp /var/log/usermonitor/$f2 USER@IP:/apprun/test/$dir
expect "*password*"
send "$PASSWD\n"
sleep 1
expect eof
方式二：
A. Tcl 安裝
主頁: http://www.tcl.tk
下載地址: http://www.tcl.tk/software/tcltk/downloadnow84.tml
1.下載源碼包
wget http://nchc.dl.sourceforge.net/sourceforge/tcl/tcl8.4.11-src.tar.gz
2.解壓縮源碼包
tar xfvz tcl8.4.11-src.tar.gz
3.安裝配置
cd tcl8.4.11/unix
./configure --prefix=/usr/tcl --enable-shared
make
make install
安裝完畢以后，進入tcl源代碼的根目錄，把子目錄unix下面的tclUnixPort.h copy到子目錄generic中。
暫時不要刪除tcl源代碼，因為expect的安裝過程還需要用。
B. expect 安裝 (需Tcl的庫)
主頁: http://expect.nist.gov/
1.下載源碼包
wget http://sourceforge.net/projects/expect/files/Expect/5.45/expect5.45.tar.gz/download
2.解壓縮源碼包
tar xzvf expect5.45.tar.gz
3.安裝配置
cd expect5.45
./configure --prefix=/usr/expect --with-tcl=/usr/tcl/lib --with-tclinclude=../tcl8.4.11/generic
make
make install
ln -s /usr/tcl/bin/expect /usr/expect/bin/expect