line |
true |
false |
branch |
110
|
3 |
0 |
unless ($sensors{'pH'}) |
116
|
3 |
0 |
unless ($sensors{'temperature'}) |
122
|
3 |
0 |
unless ($sensors{'turbidity'}) |
148
|
0 |
3 |
unless ref(my $self = shift()) |
149
|
0 |
3 |
if (ref(my $oxygen_maintainer = shift()) ne 'Acme::FishFarm::OxygenMaintainer') { } |
167
|
0 |
7 |
unless ref(my $self = shift()) |
168
|
4 |
3 |
if (@_) { } |
182
|
0 |
3 |
unless ref(my $self = shift()) |
193
|
0 |
1 |
unless ref(my $self = shift()) |
195
|
0 |
1 |
if ref $new_ph_range_ref ne ref [] |
210
|
0 |
7 |
unless ref(my $self = shift()) |
214
|
2 |
5 |
if ($self->{'current_pH'} >= $self->{'pH_range'}[0] and $self->{'current_pH'} <= $self->{'pH_range'}[1]) { } |
217
|
1 |
1 |
if ($self->is_on_LED_pH) |
237
|
0 |
5 |
unless ref(my $self = shift()) |
239
|
3 |
2 |
if (@_) { } |
254
|
0 |
3 |
unless ref(my $self = shift()) |
265
|
0 |
1 |
unless ref(my $self = shift()) |
267
|
0 |
1 |
if ref $new_temperature_range_ref ne ref [] |
283
|
0 |
6 |
unless ref(my $self = shift()) |
287
|
4 |
2 |
if ($self->{'current_temperature'} >= $self->{'temperature_range'}[0] and $self->{'current_temperature'} <= $self->{'temperature_range'}[1]) { } |
291
|
1 |
3 |
if ($self->is_on_LED_temperature) |
309
|
0 |
4 |
unless ref(my $self = shift()) |
313
|
2 |
2 |
if ($self->{'oxygen_maintainer'}->is_low_DO) { } |
318
|
1 |
1 |
if ($self->is_on_LED_DO) |
336
|
0 |
7 |
unless ref(my $self = shift()) |
338
|
4 |
3 |
if (@_) { } |
353
|
0 |
3 |
unless ref(my $self = shift()) |
364
|
0 |
2 |
unless ref(my $self = shift()) |
380
|
0 |
5 |
unless ref(my $self = shift()) |
384
|
4 |
1 |
if ($self->{'current_turbidity'} >= $self->{'turbidity_threshold'}) { } |
391
|
1 |
0 |
if ($self->is_on_LED_turbidity) |
412
|
0 |
12 |
unless ref(my $self = shift()) |
425
|
0 |
13 |
unless ref(my $self = shift()) |
443
|
0 |
47 |
unless ref(my $self = shift()) |
446
|
13 |
34 |
if ($self->lighted_LED_count == 1) { } |
|
27 |
7 |
elsif ($self->lighted_LED_count > 1) { } |
|
7 |
0 |
elsif ($self->lighted_LED_count == 0) { } |
481
|
0 |
0 |
unless ref(my $self = shift()) |
486
|
0 |
5 |
unless ref(my $self = shift()) |
501
|
0 |
0 |
unless ref(my $self = shift()) |
506
|
0 |
6 |
unless ref(my $self = shift()) |
521
|
0 |
0 |
unless ref(my $self = shift()) |
526
|
0 |
3 |
unless ref(my $self = shift()) |
541
|
0 |
0 |
unless ref(my $self = shift()) |
546
|
0 |
4 |
unless ref(my $self = shift()) |
557
|
0 |
101 |
unless ref(my $self = shift()) |
560
|
60 |
41 |
if $self->{'pH_LED_on'} |
561
|
53 |
48 |
if $self->{'temperature_LED_on'} |
562
|
28 |
73 |
if $self->{'DO_LED_on'} |
563
|
42 |
59 |
if $self->{'turbidity_LED_on'} |