| line |
true |
false |
branch |
|
113
|
0 |
1 |
if $NDevices |
|
144
|
0 |
0 |
'HASH' eq ref $_[-1] ? : |
|
148
|
0 |
0 |
defined $spec ? : |
|
151
|
0 |
0 |
if defined $self->{'device'} |
|
154
|
0 |
0 |
if $self->{'init_prefix'} |
|
159
|
0 |
0 |
unless (defined $self->{'device'}) |
|
165
|
0 |
0 |
if (exists $opts->{'vars'}) |
|
169
|
0 |
0 |
unless 'HASH' eq ref $opts->{'vars'} |
|
201
|
0 |
0 |
unless ($self->is_interactive) |
|
223
|
0 |
0 |
if @_ |
|
251
|
0 |
0 |
if 0 == (($prefix, $device) = $spec =~ m[(.*)/([^/]+)$]) |
|
265
|
0 |
0 |
if (defined $device and not exists $DevMap{lc $device}) |
|
267
|
0 |
0 |
if (defined $self->{'device'}) { } |
|
282
|
0 |
0 |
defined $device ? : |
|
286
|
0 |
0 |
if ($prefix) |
|
289
|
0 |
0 |
if ($prefix =~ /^([+])?(\d+)?$/) { } |
|
|
0 |
0 |
elsif (defined $spec{'device'}) { } |
|
291
|
0 |
0 |
defined $2 ? : |
|
295
|
0 |
0 |
defined $1 ? : |
|
300
|
0 |
0 |
if (not $spec{'devinfo'}{'inter'}) { } |
|
303
|
0 |
0 |
$spec{'device'} =~ /^v?c?(ps)$/i ? : |
|
324
|
0 |
0 |
unless not defined $spec{$_} |
|
384
|
0 |
0 |
$reverse ? : |
|
400
|
0 |
0 |
defined $self->{'prefix'} ? : |
|
419
|
0 |
0 |
defined $self->{'last'} ? : |
|
458
|
0 |
0 |
defined $self->{'prefix'} ? : |
|
470
|
0 |
0 |
defined $2 ? : |
|
485
|
0 |
0 |
'SCALAR' eq ref $self->{'vars'}{$1} ? : |
|
|
0 |
0 |
defined ${*{"${pkg}::$1";}{'SCALAR'};} ? : |
|
|
0 |
0 |
exists $self->{'vars'}{$1} ? : |
|
|
0 |
0 |
$1 eq 'devn' ? : |
|
490
|
0 |
0 |
if defined $val |