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 $@) |