#read the input parameters
 set user [lindex $argv 0]
 set passw [lindex $argv 1]
 set host [lindex $argv 2]
 set location [lindex $argv 3]
 set file1 [lindex $argv 4]
 set file2 [lindex $argv 5]

set SWITCH_IP [lindex $argv 0]

#!/usr/bin/expect -f

set timeout -1
set SWITCH_IP [lindex $argv 0]
spawn telnet $SWITCH_IP
match_max 100000
expect -exact "Trying $SWITCH_IP...\r\r
Connected to $SWITCH_IP ($SWITCH_IP).\r\r
Escape character is '^\]'.\r\r
\r
\r
User Access Verification\r
\r
Username: "
send -- "логин\r"
expect -exact "логин\r
Password: "
send -- "пароль\r"
expect -exact "\r
\r
switch10027#"
send -- "conf t\r"
expect -exact "conf t\r
Enter configuration commands, one per line.  End with CNTL/Z.\r
switch10027(config)#"
send -- "ip acce        "
expect -exact "\r
switch10027(config)#ip access-list "
send -- "e   "
expect -exact "\r
switch10027(config)#ip access-list extended "
send -- "155\r"
expect -exact "155\r
switch10027(config-ext-nacl)#"
send -- "per    "
expect -exact "\r
switch10027(config-ext-nacl)#permit "
send -- "ip g^H"
expect -exact "ip g^H ^H"
send -- "h   "
expect -exact "\r
switch10027(config-ext-nacl)#permit ip host "
send -- "х.х.х.5 a        "
expect -exact "\r
switch10027(config-ext-nacl)#permit ip host х.х.х.5 any "
send -- "\r"
expect -exact "\r
switch10027(config-ext-nacl)#"
send -- "exit\r"
expect -exact "exit\r
switch10027(config)#"
send -- "exit\r"
expect -exact "exit\r
switch10027#"
send -- "exit\r"
expect eof

#/bin/sh

while read ip
do
 /root/script.expect $ip
done <list_ip.txt

nano /home/local SWITCH_IP 

sed -i "s/switch10027/switch10028/g" script.expect