blib/lib/Finance/Currency/ParValueSeparate.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 37 | 46 | 80.4 |
line | true | false | branch |
---|---|---|---|
14 | 3 | 2 | if ($class eq 'Finance::Currency::ParValueSeparate') { } |
17 | 1 | 2 | if (defined $opt{'currency'}) { } |
21 | 1 | 1 | ref $_[0] eq 'ARRAY' ? : |
26 | 0 | 3 | if $@ |
30 | 1 | 1 | ref $_[0] eq 'ARRAY' ? : |
49 | 6 | 9 | ref $_[0] eq 'ARRAY' ? : |
50 | 8 | 7 | if scalar @$amount_ref |
52 | 5 | 10 | wantarray ? : |
57 | 1 | 22 | ref $_[0] eq 'ARRAY' ? : |
58 | 7 | 16 | if (@_) |
66 | 16 | 7 | wantarray ? : |
70 | 1 | 3 | ref $_[0] eq 'ARRAY' ? : |
71 | 2 | 2 | if (@_) |
79 | 2 | 2 | wantarray ? : |
84 | 0 | 19 | ref $_[0] eq 'ARRAY' ? : |
85 | 5 | 14 | if (@_) |
93 | 14 | 5 | wantarray ? : |
97 | 0 | 0 | ref $_[0] eq 'ARRAY' ? : |
98 | 0 | 0 | if (@_) |
106 | 0 | 0 | wantarray ? : |
112 | 2 | 15 | if (defined $flag) |
113 | 1 | 1 | $flag ? : |
134 | 0 | 14 | if $self->only_dollar |