open(OUT, ">$outdir/users") || exit $MR_OCONFIG;
-while(($login, $first, $middle, $last) = $sth->fetchrow_array) {
+while(($login, $first, $middle, $last, $clearid) = $sth->fetchrow_array) {
$row = "dn: uid=$login,ou=users,dc=mit,dc=edu\n";
$row .= "objectclass: top\n";
$row .= "objectclass: person\n";
$row .= "uid: $login\n";
$row .= "krb5PrincipalName: $login\@ATHENA.MIT.EDU\n";
$row .= "userPassword: {KERBEROS}$login\@ATHENA.MIT.EDU\n";
+ $row .= "employeeNumber: $clearid\n";
if($last) {
$sn = "sn: $last\n";