| line |
true |
false |
branch |
|
87
|
0 |
45 |
unless $self->SUPER::read('base_dn', 'ou=Group,' . $self->base_dn, @_) |
|
93
|
0 |
45 |
unless ($self->find('base_dn', 'ou=People,' . $self->base_dn, 'scope', 'sub', 'filter', "(ou=$name)")) |
|
119
|
0 |
3 |
unless my $name = delete $opts{'cn'} || $self->cn |
|
121
|
0 |
3 |
unless my $gid = delete $opts{'gidNumber'} || $self->gidNumber |
|
149
|
3 |
0 |
unless (defined $memberUid) |
|
152
|
0 |
3 |
if (defined $memberUid and ref $memberUid and @$memberUid) { } |
|
|
0 |
3 |
elsif (defined $memberUid and not ref $memberUid and $memberUid ne '0') { } |
|
198
|
0 |
0 |
unless (grep {exists $self->{'_was_set'}{$_};} @{$self->attributes;}) |
|
206
|
0 |
0 |
if (exists $self->{'_was_set'}{'gidNumber'} and not exists $self->{'_was_set'}{'cn'}) |
|
225
|
0 |
0 |
if (exists $self->{'_was_set'}{'cn'}) |
|
231
|
0 |
0 |
if ($self->debug) |
|
235
|
0 |
0 |
unless my $oldgroup = $class->new('ldap', $self->ldap, 'cn', $old_name)->read |
|
242
|
0 |
0 |
exists $self->{'_was_set'}{'gidNumber'} ? : |
|
264
|
0 |
0 |
if ($self->debug) |
|
345
|
0 |
0 |
unless ($name) |
|
351
|
0 |
0 |
ref $self ? : |
|
352
|
0 |
0 |
unless ($group) |
|
356
|
0 |
0 |
unless ($opts{'skip_check'}) |
|
365
|
0 |
0 |
if (scalar @{$group->users;}) |
|
407
|
0 |
1 |
unless my $user_class = $self->user_class |
|
415
|
0 |
1 |
wantarray ? : |
|
429
|
0 |
3 |
unless my $user_class = $self->user_class |
|
461
|
0 |
3 |
wantarray ? : |
|
476
|
0 |
6 |
unless my $user_class = $self->user_class |
|
477
|
0 |
6 |
unless my $ldap = $self->ldap |
|
483
|
5 |
22 |
unless my $uid = shift @uids |