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 (@_) { } |