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