I need to know how to enter 2500 passwords programmatically.
thanks to Matt Moore <moorem_at_storm.bucks.edu> for this awesome perl script.
it was exactly what i was looking for.
#!/usr/bin/perl
# Program to change passwords
while (<>) {
chop;
($login, $pword) = split;
$salt=substr($pword,0,2);
$password=crypt($pword,$salt);
`/tcb/bin/edauth -gdp $login | sed 's|:u_pwd=[^:]*:|:u_pwd='$password':|' |
sed 's/:u_oldcrypt#.:/:u_oldcrypt#2:/' | /tcb/bin/edauth -sdp`
}
several other suggested expect scripts (i was actually working on one)
George Guethlein (gguethlein_at_giantofmaryland.com ) sent me some very nice
expect scripts.
several other suggested c.
thanks to all.
Chris
Received on Fri May 07 1999 - 18:00:47 NZST