Condition Coverage

blib/lib/Net/Peep/Conf.pm
Criterion Covered Total %
condition 39 256 15.2


and 2 conditions

line l !l condition
599 0 0 $self->logger->log("\t\tThe host name for IP [$ip] could not be found. This host will be ignored.") and return 0
608 0 0 $self->logger->log("\t\tThe IP address for host [$identifier] could not be found. This host will be ignored.") and return 0
660 0 0 $self->logger->log("Cannot get host information for the client [$client]: No information has been set.") and return
708 0 0 $self->logger->log("Cannot get uptime information for the client [$client]: No information has been set.") and return
756 0 0 $self->logger->log("Cannot get proc information for the client [$client]: No information has been set.") and return

and 3 conditions

line !l l&&!r l&&r condition
160 0 0 4 ref $value eq 'HASH' and exists $$value{'ip'}
0 0 4 ref $value eq 'HASH' and exists $$value{'ip'} and exists $$value{'port'}
195 0 0 0 exists $$self{'__BROADCAST'} and exists $$self{'__BROADCAST'}{$class}
208 0 0 4 ref $value eq 'HASH' and exists $$value{'name'}
0 0 4 ref $value eq 'HASH' and exists $$value{'name'} and exists $$value{'port'}
241 0 0 3 exists $$self{'__SERVER'} and exists $$self{'__SERVER'}{$class}
281 0 0 16 exists $$self{'__CLASS'} and exists $$self{'__CLASS'}{$key}
347 0 0 0 exists $$self{'__EVENT'} and exists $$self{'__EVENT'}{$name}
359 0 0 0 exists $$self{'__EVENT'} && exists $$self{'__EVENT'}{$name}
464 0 0 0 exists $$self{'__STATE'} and exists $$self{'__STATE'}{$name}
476 0 0 0 exists $$self{'__STATE'} && exists $$self{'__STATE'}{$name}
519 0 0 0 exists $$self{'__CLIENTEVENT'} and exists $$self{'__CLIENTEVENT'}{$name}
660 0 0 0 exists $$self{'__CLIENTHOST'} and exists $$self{'__CLIENTHOST'}{$client}
677 0 0 0 exists $$value{'name'} and exists $$value{'value'}
0 0 0 exists $$value{'name'} and exists $$value{'value'} and exists $$value{'status'}
708 0 0 0 exists $$self{'__CLIENTUPTIME'} and exists $$self{'__CLIENTUPTIME'}{$client}
725 0 0 0 exists $$value{'name'} and exists $$value{'value'}
0 0 0 exists $$value{'name'} and exists $$value{'value'} and exists $$value{'status'}
756 0 0 0 exists $$self{'__CLIENTPROC'} and exists $$self{'__CLIENTPROC'}{$client}
838 0 24 84 exists $$self{'__OPTIONS'}{$name} and exists $$self{'__OPTIONS'}{$name}{$option}

or 3 conditions

line l !l&&r !l&&!r condition
26 0 5 0 ref $self || $self
52 4 0 0 shift() || confess('Cannot set version: No version information found')
81 4 0 0 shift() || confess('Cannot set sound path: No sound path information found')
110 0 0 0 shift() || confess('Cannot set app: No app information found')
132 16 0 0 shift() || confess('Cannot set port: No client information found')
133 16 0 0 shift() || confess('Cannot set port: No port information found')
142 3 0 0 shift() || confess('Cannot get port: No client information found')
157 4 0 0 shift() || confess('Cannot add broadcast: No class identifier found')
158 4 0 0 shift() || confess('Cannot add broadcast: No broadcast information found')
193 0 0 0 shift() || confess('Cannot get broadcast: No class identifier found')
205 4 0 0 shift() || confess('Cannot add server: No class identifier found')
206 4 0 0 shift() || confess('Cannot add server: No server information found')
239 3 0 0 shift() || confess('Cannot get server: No class identifier found')
251 4 0 0 shift() || confess('Cannot add class: No class identifier found')
252 4 0 0 shift() || confess('Cannot add class: No class information found')
279 16 0 0 shift() || confess('no class identifier found')
291 0 0 0 shift() || confess('Cannot add client class: No client identifier found')
292 0 0 0 shift() || confess('Cannot add client class: No class identifier found')
303 0 0 0 shift() || confess('Cannot add client classes: No client identifier found')
317 72 0 0 shift() || confess('Cannot add event: No event identifier found')
318 72 0 0 shift() || confess('Cannot add event: No event information found')
345 0 0 0 shift() || confess('Cannot get event: No event identifier found')
357 0 0 0 shift() || confess('Cannot check event: No event identifier found')
434 12 0 0 shift() || confess('Cannot add state: No state identifier found')
435 12 0 0 shift() || confess('Cannot add state: No state information found')
462 0 0 0 shift() || confess('Cannot get state: No state identifier found')
474 0 0 0 shift() || confess('Cannot check state: No state identifier found')
483 0 0 0 shift() || confess('Cannot add client event: No client event identifier found')
484 0 0 0 shift() || confess('Cannot add client event: No client event information found')
517 0 0 0 shift() || confess('Cannot get clientevent: No clientevent identifier found')
529 0 0 0 shift() || confess('Client not found')
530 0 0 0 shift() || confess('Event not found')
571 0 0 0 shift() || confess('Client not found')
572 0 0 0 shift() || confess('Host not found')
585 0 0 0 shift() || confess('Cannot add client host: No client identifier found')
586 0 0 0 shift() || confess('Cannot add client host: No client host information found')
658 0 0 0 shift() || confess('Cannot get client host: No client identifier found')
671 0 0 0 shift() || confess('Cannot add client uptime: No client identifier found')
672 0 0 0 shift() || confess('Cannot add client uptime: No client uptime information found')
706 0 0 0 shift() || confess('Cannot get client uptime settings: No client identifier found')
719 0 0 0 shift() || confess('Cannot add client proc: No client identifier found')
720 0 0 0 shift() || confess('Cannot add client proc: No client proc information found')
754 0 0 0 shift() || confess('Cannot get client proc settings: No client identifier found')
773 46 0 0 $self->client || confess('Cannot set client option: Client not specified.')
774 46 0 0 $client->name || confess('Cannot set client option: Client name not specified.')
775 46 0 0 shift() || confess('Cannot set client option: Option name not specified.')
782 0 0 0 shift() || confess('Cannot set client option: Client name not specified.')
783 0 0 0 shift() || confess('Cannot set client option: Option name not specified.')
802 21 0 0 shift() || confess('Cannot get client option: Option name not specified.')
803 21 0 0 $self->client || confess('Cannot get client option: Client not specified.')
804 21 0 0 $client->name || confess('Cannot get client option: Client name not specified.')
806 54 0 0 shift() || confess('Cannot get client option: Client name not specified.')
807 54 0 0 shift() || confess('Cannot get client option: Option name not specified.')
828 30 0 0 shift() || confess('Cannot evaluate client option: Option name not specified.')
829 30 0 0 $self->client || confess('Cannot evaluate client option: Client not specified.')
830 30 0 0 $client->name || confess('Cannot evaluate client option: Client name not specified.')
832 78 0 0 shift() || confess('Cannot evaluate client option: Client name not specified.')
833 78 0 0 shift() || confess('Cannot evaluate client option: Option name not specified.')
855 0 0 0 $self->client || confess('Cannot get client options: Client not specified.')
856 0 0 0 $client->name || confess('Cannot get client options: Client name not specified.')
874 0 0 0 $self->client || confess('Cannot get options hash: Client not specified.')
875 0 0 0 $client->name || confess('Cannot get options hash: Client name not specified.')