Branch Coverage

blib/lib/Net/Peep/Conf.pm
Criterion Covered Total %
branch 33 178 18.5


line true false branch
36 4 36 unless (exists $$self{'__LOGGER'})
44 4 113 if (@_)
63 5 0 if (exists $$self{'__VERSION'}) { }
92 0 0 if (exists $$self{'__SOUNDPATH'}) { }
121 0 0 if (exists $$self{'__APP'}) { }
144 0 3 if (exists $$self{'__PORT'}{$client}) { }
3 0 elsif ($self->optionExists($client, 'port')) { }
160 0 4 unless ref $value eq 'HASH' and exists $$value{'ip'} and exists $$value{'port'}
175 0 0 unless exists $$self{'__BROADCAST'}
186 0 0 wantarray ? :
195 0 0 unless exists $$self{'__BROADCAST'} and exists $$self{'__BROADCAST'}{$class}
198 0 0 wantarray ? :
208 0 4 unless ref $value eq 'HASH' and exists $$value{'name'} and exists $$value{'port'}
221 0 0 unless exists $$self{'__SERVER'}
232 0 0 wantarray ? :
241 0 3 unless exists $$self{'__SERVER'} and exists $$self{'__SERVER'}{$class}
244 0 3 wantarray ? :
254 0 4 unless ref $value eq 'ARRAY'
267 0 6 unless exists $$self{'__CLASS'}
272 6 0 wantarray ? :
281 0 16 unless exists $$self{'__CLASS'} and exists $$self{'__CLASS'}{$key}
284 0 16 wantarray ? :
305 0 0 unless exists $$self{'__CLIENTCLASS'}{$client}
310 0 0 wantarray ? :
320 0 72 unless ref $value eq 'HASH'
333 0 0 unless exists $$self{'__EVENT'}
338 0 0 wantarray ? :
347 0 0 unless exists $$self{'__EVENT'} and exists $$self{'__EVENT'}{$name}
350 0 0 wantarray ? :
369 0 16 unless $client
372 0 16 unless @text
390 0 0 unless exists $$self{'__CONFIGURATIONTEXT'}{$client}
403 0 16 unless $client
406 0 16 unless @text
424 0 0 unless exists $$self{'__NOTIFICATIONTEXT'}{$client}
437 0 12 unless ref $value eq 'HASH'
450 0 0 unless exists $$self{'__STATE'}
455 0 0 wantarray ? :
464 0 0 unless exists $$self{'__STATE'} and exists $$self{'__STATE'}{$name}
467 0 0 wantarray ? :
486 0 0 unless ref $value eq 'HASH'
501 0 0 unless exists $$self{'__CLIENTEVENT'}
510 0 0 wantarray ? :
519 0 0 unless exists $$self{'__CLIENTEVENT'} and exists $$self{'__CLIENTEVENT'}{$name}
522 0 0 wantarray ? :
536 0 0 if exists $$event{'group'}
537 0 0 if exists $$event{'option-letter'}
543 0 0 if $self->optionExists($client, 'events')
544 0 0 if $self->optionExists($client, 'groups')
545 0 0 if $self->optionExists($client, 'exclude')
550 0 0 if $letter eq $letter_option
553 0 0 if (grep /^all$/, @groups) { }
556 0 0 if $group eq $exclude_option
560 0 0 if $group eq $group_option
588 0 0 unless ref $value eq 'HASH'
594 0 0 if ($identifier =~ /^(\d+\.)+\d+$/) { }
0 0 elsif ($identifier =~ /^([\w-]+\.)+\w+$/) { }
598 0 0 if $host
599 0 0 unless $host
607 0 0 if $ip
608 0 0 unless $ip
642 0 0 unless exists $$self{'__CLIENTHOST'}
651 0 0 wantarray ? :
660 0 0 unless exists $$self{'__CLIENTHOST'} and exists $$self{'__CLIENTHOST'}{$client}
664 0 0 wantarray ? :
674 0 0 unless ref $value eq 'HASH'
677 0 0 unless exists $$value{'name'} and exists $$value{'value'} and exists $$value{'status'}
690 0 0 unless exists $$self{'__CLIENTUPTIME'}
699 0 0 wantarray ? :
708 0 0 unless exists $$self{'__CLIENTUPTIME'} and exists $$self{'__CLIENTUPTIME'}{$client}
712 0 0 wantarray ? :
722 0 0 unless ref $value eq 'HASH'
725 0 0 unless exists $$value{'name'} and exists $$value{'value'} and exists $$value{'status'}
738 0 0 unless exists $$self{'__CLIENTPROC'}
747 0 0 wantarray ? :
756 0 0 unless exists $$self{'__CLIENTPROC'} and exists $$self{'__CLIENTPROC'}{$client}
760 0 0 wantarray ? :
771 46 0 if (@_ == 2) { }
0 0 elsif (@_ == 3) { }
801 21 54 if (@_ == 1) { }
54 0 elsif (@_ == 2) { }
812 0 75 unless $self->optionExists($name, $option)
827 30 78 if (@_ == 1) { }
78 0 elsif (@_ == 2) { }
838 84 24 if (exists $$self{'__OPTIONS'}{$name} and exists $$self{'__OPTIONS'}{$name}{$option}) { }
852 0 0 if (@_) { }
858 0 0 unless exists $$self{'__OPTIONS'}{$name}
861 0 0 wantarray ? :
871 3 0 if (@_) { }