| line |
true |
false |
branch |
|
18
|
10 |
38 |
unless $_[0][1] |
|
77
|
0 |
96 |
if (ref $class) { } |
|
84
|
95 |
1 |
if @_ > 1 |
|
118
|
0 |
95 |
unless @_ > 1 |
|
120
|
9 |
86 |
unless ($value) |
|
125
|
20 |
66 |
if (ref $value and $value->isa('DR::Money')) |
|
134
|
7 |
59 |
if ($value =~ /^(-)?0*(\d+)[,\.]?$/) { } |
|
|
59 |
0 |
elsif ($value =~ /^(-)?0*(\d*)[,\.](\d+)$/) { } |
|
138
|
1 |
6 |
$sign eq '-' ? : |
|
145
|
3 |
56 |
unless $r or $k |
|
146
|
11 |
48 |
$sign eq '-' ? : |
|
171
|
19 |
0 |
unless $flip |
|
191
|
6 |
1 |
unless $flip |
|
199
|
6 |
38 |
if $sign eq '-' |
|
210
|
4 |
14 |
if ($kop < 0) { } |
|
254
|
0 |
5 |
if ref $mul and $mul->isa('DR::Money') |
|
276
|
2 |
1 |
unless $flip |
|
296
|
3 |
7 |
if $div == 0 and not $flip or $flip and not $self |
|
299
|
2 |
5 |
if (ref $div and $div->isa('DR::Money')) |
|
301
|
2 |
0 |
unless $flip |
|
305
|
3 |
2 |
unless $flip |
|
406
|
1 |
1 |
if ref $av and $av->isa('DR::Money') |
|
424
|
1 |
1 |
if $$self[0] eq '+' |