| blib/lib/Math/Calc/Euro.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 6 | 0.0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 15 | 0 | 0 | 0 | defined $currency && ($rates{uc $currency} || 0 + $currency) || (ref $proto eq 'Math::Calc::Euro' ? $$proto : croak('Invalid currency')) |
| 23 | 0 | 0 | 0 | ref $proto || $proto |