Branch Coverage

blib/lib/Geo/GeoNames.pm
Criterion Covered Total %
branch 37 56 66.0


line true false branch
207 2 8 unless length $hash{'username'}
216 3 5 if exists $hash{'ua'} and not ref $hash{'ua'} && &blessed($hash{'ua'}) && ($hash{'ua'}->isa('Mojo::UserAgent') || $hash{'ua'}->isa('LWP::UserAgent'))
219 0 5 exists $hash{'debug'} ? :
220 0 5 exists $hash{'cache'} ? :
229 8 1 if @_ == 2
237 5 0 if @_ == 2
252 8 1 if @_ == 2
267 0 1 if ($flags =~ /d/ and exists $hash->{$arg})
271 0 31 if ($flags eq 'r' and not exists $hash->{$arg})
274 0 26 if (not $flags =~ /m/ and exists $hash->{$arg} and ref $hash->{$arg})
277 3 28 if ($flags eq 'rc')
279 1 2 if (exists $hash->{$arg})
285 0 1 if ($conditional_mandatory_required == 1 and $conditional_mandatory_flag != 1)
289 0 2 unless defined $valid_parameters{$request}{$key}
290 0 2 ref $hash->{$key} ? :
306 1 2 if ($xml->{'status'})
311 1 1 if $single_result
315 2 3 if ref $xml->{$element} ne 'ARRAY'
317 1 2 if ref $list ne 'HASH'
319 48 48 unless defined $list->{$attribute}[0]
320 47 1 scalar @{$list->{$attribute};} == 1 ? :
346 1 0 $res->can('res') ? :
360 1 0 if ($response->can('body')) { }
367 1 0 if ($mime_type =~ m[\Atext/xml;?])
370 0 0 if ($mime_type =~ m[\Aapplication/json;?])
373 0 0 if ($body =~ /\A\{/) { }
374 0 0 if ($response->can('json')) { }
402 0 1 unless (exists $self->{'_functions'}{$name})