| blib/lib/Test/ISBN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 18 | 66.6 |
| line | true | false | branch |
|---|---|---|---|
| 49 | 0 | 11 | ref $isbn ? : |
| 53 | 3 | 8 | unless $ok |
| 72 | 0 | 2 | ref $isbn ? : |
| 74 | 1 | 1 | do { $object->group_code eq $country } ? : |
| 2 | 0 | $object->is_valid ? : | |
| 123 | 0 | 2 | ref $isbn ? : |
| 125 | 1 | 1 | do { $object->publisher_code eq $publisher } ? : |
| 2 | 0 | $object->is_valid ? : | |
| 144 | 0 | 15 | if (eval { do { $arg->isa('Business::ISBN') } }) { } |