Branch Coverage

blib/lib/Device/Firmata/Base.pm
Criterion Covered Total %
branch 9 78 11.5


line true false branch
45 1 1 if (@_)
47 1 0 if (my $attrs = $opts->{'FIRMATA_ATTRIBS'})
51 1 0 unless (ref *{$pkg . '::ISA';} eq 'ARRAY' and @${$pkg . '::ISA';})
54 1 0 $opts->{'ISA'} ? :
0 1 ref $opts->{'ISA'} ? :
71 0 0 if $self->{'_biofunc_pre_init'}
73 0 0 if ($self->{'_biofunc_init'}) { }
80 0 0 if $self->{'_biofunc_post_init'}
98 0 0 if $self->{'_biofunc_pre_init'}
100 0 0 if ($self->{'_biofunc_init'}) { }
107 0 0 if $self->{'_biofunc_post_init'}
121 0 0 unless exists $opts->{$k}
122 0 0 if $k =~ /^_biofunc/
136 0 0 @_ ? :
138 0 0 if ${"${class}::ABSOLUTE_ATTRIBS";}
143 0 0 unless ${"${c}::FIRMATA_ATTRIBS";}
146 0 0 if (${"${c}::ABSOLUTE_ATTRIBS";}) { }
150 0 0 if $track->{$c}
155 0 0 if exists $u->{$k}
161 0 0 $class->can($f) ? :
181 0 1 unless @_ > 1
183 0 1 if (@_ == 2)
184 0 0 if ref $_[1]
188 0 1 unless @_ % 2
203 0 0 if (ref $s)
204 0 0 if (UNIVERSAL::isa($s, 'HASH')) { }
0 0 elsif (UNIVERSAL::isa($s, 'ARRAY')) { }
207 0 0 ref $v ? :
213 0 0 ref $_ ? :
228 0 0 if @_ >= 2
238 0 0 if @_ >= 2
262 0 0 if (@_)
284 0 0 if $Device::Firmata::Base::FIRMATA_ERROR
286 0 0 if ($Device::Firmata::Base::FIRMATA_ERROR_CLASS eq 'Device::Firmata::Error')
293 0 0 if $@
297 0 0 if $@
355 0 0 if ($self and UNIVERSAL::isa($self, 'Device::Firmata::Base')) { }
380 0 0 unless $object_class =~ /^\w+(?:::\w+)*$/
381 0 0 unless eval "require $object_class; 1"