line |
true |
false |
branch |
21
|
0 |
16 |
if $Physics::Unit::Scalar::debug |
25
|
1 |
15 |
if (ref $proto) { } |
34
|
0 |
15 |
if $Physics::Unit::Scalar::debug |
35
|
14 |
1 |
if (defined $def) |
42
|
3 |
12 |
if ($class eq 'Physics::Unit::Scalar') { } |
60
|
1 |
11 |
if (not defined $def or $def eq '') { } |
|
2 |
9 |
elsif ($def =~ /^$Physics::Unit::number_re$/io) { } |
74
|
1 |
8 |
if 'Physics::Unit::' . $u->type ne $class |
97
|
1 |
0 |
if (ref $proto) { } |
107
|
10 |
1 |
unless @_ |
118
|
0 |
1 |
unless ref $self and ref $u |
126
|
0 |
13 |
if @_ |
135
|
0 |
1 |
unless ref $self and ref $other |
137
|
0 |
1 |
if ref $self ne ref $other |
147
|
0 |
0 |
unless ref $self |
158
|
0 |
0 |
unless ref $self and ref $other |
160
|
0 |
0 |
if ref $self ne ref $other |
172
|
0 |
2 |
unless ref $self and ref $other |
191
|
0 |
2 |
unless ref $self |
194
|
0 |
2 |
unless $$self{'value'} |
212
|
0 |
2 |
unless ref $self and ref $other |
222
|
3 |
2 |
if (ref $n) { } |
232
|
0 |
30 |
if $Physics::Unit::Scalar::debug |
249
|
12 |
0 |
if (ref $proto) { } |
275
|
6 |
3 |
if ($type) { } |
276
|
0 |
6 |
if $type eq 'prefix' |