| blib/lib/Business/ISIN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 9 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 61 | 0 | 1 | 46 | $$self{'value'} =~ /^(([A-Za-z]{2})([A-Za-z0-9]{9}))([0-9]) $/x && exists $Business::ISIN::country_code{uc $2} && $4 == check_digit($1) |
| 74 | 1 | 1 | 4 | length $1 > 0 and exists $Business::ISIN::country_code{uc $1} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 32 | 0 | 1 | 0 | ref $proto || $proto |