Branch Coverage

File:blib/lib/Geo/Address/Parser/Country.pm
Coverage:97.1%

line%coveragebranch
447100TFif (my $match = $DIRECT{$lc}) { }
100TFelsif ($component =~ /^[A-Z]{2}$/i and $self->{'us'}{'code2state'}{uc $component}) { }
100TFelsif ($self->{'us'}{'state2code'}{uc $component}) { }
100TFelsif ($component =~ /^[A-Z]{2}$/i and $self->{'ca_en'}{'code2province'}{uc $component} || $self->{'ca_fr'}{'code2province'}{uc $component}) { }
100TFelsif ($self->{'ca_en'}{'province2code'}{uc $component} or $self->{'ca_fr'}{'province2code'}{uc $component}) { }
100TFelsif ($component =~ /^[A-Z]{2,3}$/i and $self->{'au'}{'code2state'}{$component}) { }
100TFelsif ($self->{'au'}{'state2code'}{uc $component}) { }
100TFelsif (my $loc = 'Locale::Object::Country'->new('name', $component)) { }
100TFelsif ($self->{'geonames'}) { }
448100TFif (ref $match eq 'HASH') { }
45050TFif $match->{'warning'}
516100TFdefined $country ? :
660100TFif $place =~ /,\s*\Q$suffix\E\s*$/i
699100TFif (ref $result eq 'ARRAY') { }
100TFelsif (not ref $result) { }
706100TFunless ref $result eq "HASH"
710100TFunless defined $country and not ref $country and length $country