| blib/lib/Geo/States.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 14 | 78.5 |
| line | true | false | branch |
|---|---|---|---|
| 94 | 0 | 7 | unless $country |
| 98 | 1 | 6 | unless $country eq 'us' or $country eq 'ca' |
| 117 | 0 | 28 | unless my $state = shift() |
| 126 | 12 | 16 | if $objects{$subclass} |
| 130 | 6 | 10 | length $state == 2 ? : |
| 2 | 14 | unless my $data = length $state == 2 ? $state_abbr{$country}{$state} : $state_name{$country}{$state} | |
| 142 | 0 | 14 | unless eval "$code;1" |