Changeset 11556 for issm/trunk-jpl/externalpackages/dyson/ldap.pl

Timestamp:

02/27/12 16:38:58 (13 years ago)

Author:

Eric.Larour

Message:

New script

File:

• issm/trunk-jpl/externalpackages/dyson/ldap.pl (modified) (1 diff)

issm/trunk-jpl/externalpackages/dyson/ldap.pl

@@ -7 +7 @@
 $bn="jplbadgenumber"; $txt="$bn".".txt"; $db="jplusers.db";                # Initialize values
 #
-system(`$ldb -x -h $lds -b $ou uid=* filter $bn > $txt`);                     # Execute LDAPsearch, write to file
+system(`$ldb -x -h $lds -b $ou uid=* uid > $txt`);                         # Execute LDAPsearch, write to file
 #
 open(I,"<$txt");                                                           # Open input file handle
   open(O,">badges.tmp");                                                   # Open output file handle
     while (<I>) { chomp($_);                                               # Spool through input file
-      if ($_=~"^uid=") {                                                   # If line begins with UID value,
-        $_=~s/uid=//; $_=~s/,(.*)$//; $_=~s/\n//;                          #   strip line of extraneous data
+      if ($_ =~ "^uid: ") {                                                # If line begins with UID value,
+        $_=~s/uid: //; $_=~s/,(.*)$//; $_=~s/\n//;                         #   strip line of extraneous data
         if (!($_=~/^\d\d\d\d\d\d/)) { print O "$_\n"; }                    # If UID is non-numeric, print output
       }                                                                    # Close condition