Branch Coverage

blib/lib/WebService/StreetMapLink.pm
Criterion Covered Total %
branch 14 20 70.0


line true false branch
36 0 8 if $@
57 4 5 if ($p{'subclass'})
59 0 4 if ($p{'subclass'} =~ /::/) { }
71 5 4 unless ($subclass)
75 0 5 unless exists $CountryToClass{$country}
92 4 7 if ($country =~ /united\s+states|u\.s\.(?:a\.)?/i)
97 2 9 if ($country =~ /united\s+kingdom|u\.k\./i)
114 54 0 if $self->can($m)
118 18 0 if $self->can('_query')
129 0 18 $_[0]{'scheme'} ? :