28 |
base => "dc=skole,dc=hr", |
base => "dc=skole,dc=hr", |
29 |
# filter => "(&(sn=Barr) (o=Texas Instruments))", |
# filter => "(&(sn=Barr) (o=Texas Instruments))", |
30 |
filter => "(objectClass=hrEduPerson)", |
filter => "(objectClass=hrEduPerson)", |
31 |
sizelimit => 3, # 0 = off |
sizelimit => 100, # 0 = off |
32 |
); |
); |
33 |
|
|
34 |
if ( $mesg->code ) { |
if ( $mesg->code ) { |
42 |
$entry->dump; |
$entry->dump; |
43 |
|
|
44 |
my $data; |
my $data; |
45 |
my $user = CAdmin::Model::User->new; |
my $user = A3C::Model::User->new; |
46 |
|
|
47 |
my @columns = map { $_->name } $user->columns; |
my @columns = map { $_->name } $user->columns; |
48 |
#warn "# columns = ",dump( @columns ); |
#warn "# columns = ",dump( @columns ); |