PerlUserNL
New User
Jan 13, 2011, 4:02 AM
Post #1 of 1
(181 views)
|
|
ADSI compare usernames
|
Can't Post
|
|
Hi There,
I made the following script:
<code>
use strict;
use warnings;
use Win32::OLE;
my $ou;
my @filter;
my $obj;
$ou=Win32::OLE->GetObject("LDAP://ou=NID_Users,dc=A34,dc=NID");
@filter=("user");
$ou->{filter}=\@filter;
print "Hier Volgt een lijst van gebruikers:\n";
foreach $obj (in $ou){
print "$obj->{name}\n";
print " First name: " ;
print "$obj->{givenName}\n" ;
print "###############\n\n\n" ;
}
</code>
I need that the script find the users with the same givenName (first name).
Then i need that the users with the same first name, get de username from all users with the same front name in there General field in AD.
Is there someone wo can help me?
Kind Regards
PerlUserNL
|
MAIN
SEARCH
WHO'S 
LOG 