| line |
true |
false |
branch |
|
120
|
0 |
0 |
unless $args{'PARENT'} |
|
121
|
0 |
0 |
unless $ret = $new->_parent($args{'PARENT'}) |
|
122
|
0 |
0 |
if ($args{'NAME'}) |
|
123
|
0 |
0 |
unless $ret = $new->name($args{'NAME'}) |
|
124
|
0 |
0 |
unless $args{'WHERE'} |
|
125
|
0 |
0 |
unless $ret = Unix::Conf::Bind8::Conf::_insert_in_list($new, $args{'WHERE'}, $args{'WARG'}) |
|
128
|
0 |
0 |
unless $ret = $new->elements($args{'ELEMENTS'} || []) |
|
148
|
0 |
0 |
if (defined $name) |
|
153
|
0 |
0 |
if ($$self{'name'}) |
|
154
|
0 |
0 |
unless $ret = Unix::Conf::Bind8::Conf::_del_acl($self) |
|
157
|
0 |
0 |
unless $ret = Unix::Conf::Bind8::Conf::_add_acl($self) |
|
189
|
0 |
0 |
if (@_) |
|
191
|
0 |
0 |
if (ref $_[0] and not UNIVERSAL::isa($_[0], 'Unix::Conf::Bind8::Conf::Acl')) { } |
|
192
|
0 |
0 |
unless UNIVERSAL::isa($_[0], 'ARRAY') |
|
201
|
0 |
0 |
if (ref $_) { } |
|
213
|
0 |
0 |
unless $ret = __valid_element($self->_parent, $_) |
|
217
|
0 |
0 |
if ref $_ and UNIVERSAL::isa($_, 'Unix::Conf::Bind8::Conf::Acl') |
|
235
|
0 |
0 |
defined $$self{'elements'} ? : |
|
252
|
0 |
0 |
if (ref $_ and UNIVERSAL::isa($_, 'Unix::Conf::Bind8::Conf::Acl')) { } |
|
284
|
0 |
0 |
if (@_) |
|
287
|
0 |
0 |
if (ref $_[0] and not UNIVERSAL::isa($_[0], 'Unix::Conf::Bind8::Conf::Acl')) { } |
|
288
|
0 |
0 |
unless UNIVERSAL::isa($_[0], 'ARRAY') |
|
297
|
0 |
0 |
if (ref $_) { } |
|
298
|
0 |
0 |
if $$self{'objects'}{$_} |
|
309
|
0 |
0 |
if $$self{'allelements'}{$_} |
|
313
|
0 |
0 |
unless $ret = __valid_element($self->_parent, $_) |
|
317
|
0 |
0 |
if ref $_ and UNIVERSAL::isa($_, 'Unix::Conf::Bind8::Conf::Acl') |
|
351
|
0 |
0 |
unless @_ |
|
354
|
0 |
0 |
if (ref $_[0] and not UNIVERSAL::isa($_[0], 'Unix::Conf::Bind8::Conf::Acl')) { } |
|
355
|
0 |
0 |
unless UNIVERSAL::isa($_[0], 'ARRAY') |
|
364
|
0 |
0 |
if (ref $_) |
|
365
|
0 |
0 |
unless $$self{'objects'}{$_} |
|
371
|
0 |
0 |
unless $$self{'allelements'}{$_} |
|
382
|
0 |
0 |
if (ref $_) { } |
|
390
|
0 |
0 |
if ref($obj = $$self{'allelements'}{$_}) |
|
399
|
0 |
0 |
if $$self{'aclparent'} and keys %{$$self{'allelements'};} == 0 |
|
403
|
0 |
0 |
if not keys %{$$self{'allelements'};} and $self->name |
|
413
|
0 |
0 |
if $$self{'allelements'}{$element} |
|
414
|
0 |
0 |
if $$self{'objects'}{$element} |
|
430
|
0 |
0 |
unless $TabLevel |
|
442
|
0 |
0 |
if $Name = $self->name |
|
446
|
0 |
0 |
unless defined $TabLevel |