Branch Coverage

blib/lib/Acme/FishFarm/WaterConditionMonitor.pm
Criterion Covered Total %
branch 62 100 62.0


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'}