expect-demo.txt
Download expect-demo.txt
1: #!/usr/bin/expect -f
2: # expect script to automate the use of the passwd program
3: # to set user passwords. To change passwords of other
4: # users, passwd must be run by root.
5: #
6: # Written 12/2009 by Wayne Pollock, Tampa Florida USA
7: # $Id: expect-demo,v 1.0 2009/12/02 08:35:40 wpollock Exp $
8:
9: set user [lindex $argv 0]
10: set password [lindex $argv 1]
11: if { $user == "" || $password == "" } {
12: puts "Usage: <user> <password>\n"
13: exit 1
14: }
15:
16: # alt: Have passwd arg only and get the username from the environment:
17: #set user $env(USER)
18:
19: spawn passwd $user
20:
21: expect "password:"
22: send "$password\r"
23: expect "password:"
24: send "$password\r"
25: expect eof