Branch Coverage

blib/lib/Hardware/UPS/Perl/Driver.pm
Criterion Covered Total %
branch 11 38 28.9


line true false branch
136 1 0 @_ ? :
151 0 1 if ($refType ne 'HASH')
159 0 1 unless (defined $logger)
160 0 0 unless $logger = 'Hardware::UPS::Perl::Logging'->new
170 0 1 if (defined $driverOptions) { }
172 0 0 if ($refType ne 'HASH')
195 0 1 if (defined $driverName)
197 0 0 unless ($self->setDriverHandle($driverName))
224 0 0 if (exists $$self{'errorMessage'}) { }
243 0 1 if (exists $$self{'logger'}) { }
262 0 1 unless 1 == @_
265 1 0 if (defined $logger)
267 0 1 if ($loggerRefType ne 'Hardware::UPS::Perl::Logging')
293 0 1 if (exists $$self{'options'}) { }
311 0 1 unless 1 == @_ and ref $_[0] eq 'HASH'
337 0 0 if (exists $$self{'driver'}) { }
356 0 0 unless 1 == @_
370 0 0 if ($@)
380 0 0 if (not $driverHandle && ref $driverHandle or $@)