Branch Coverage

lib/Geo/Coder/Many.pm
Criterion Covered Total %
branch 51 88 57.9


line true false branch
196 0 210 unless (defined $args->{'scheduler_type'})
199 0 210 unless ($self->{'scheduler_type'} =~ /OrderedList|WRR|WeightedRandom/x)
206 0 210 if ($args->{'cache'})
243 0 420 unless ($self->_geocoder_module_is_compatible_with_plugin($module, $plugin))
250 0 420 if (exists $self->{'geocoders'}{$geocoder->get_name})
256 0 420 if ($@)
279 60 150 if (ref $filter_callback eq '')
293 0 210 if (defined $filter_callback and ref $filter_callback ne 'CODE')
331 84 126 if (ref $picker_callback eq '')
343 0 210 if (defined $picker_callback and ref $picker_callback ne 'CODE')
424 0 2100 unless (exists $args->{'location'})
429 2100 0 unless ($args->{'no_cache'})
434 0 2100 if (defined $response)
439 0 2100 unless (keys %{$$self{'geocoders'};})
458 575 3613 unless (defined $waiting_time)
464 0 1131 if ($waiting_time > 0 and $args->{'wait_for_retries'})
471 1195 2418 unless defined $geocoder
476 0 2418 if ($geocoder_name eq $previous_geocoder_name)
480 2418 0 unless $args->{'geocoders_to_skip'}
0 2418 if &any(sub { $geocoder_name eq $_; } , @{[] unless $args->{'geocoders_to_skip'};})
486 2418 0 if (defined $Response) { }
499 1195 1223 if ($self->_response_valid($Response))
507 267 928 if (@passed_responses == 0)
511 775 153 if (defined $self->{'picker_callback'}) { }
531 177 598 if (defined $picked)
549 1503 597 if (defined $self->{'picker_callback'} and not defined $accepted_response)
554 2100 0 unless ($args->{'no_cache'})
591 0 420 if ($plugin->can('_MIN_MODULE_VERSION'))
597 0 0 if (&versioncmp($have_version, $min_version) < 0)
628 0 144 unless ref $name eq ''
634 144 40 if ($name =~ /$regex/)
650 0 2418 unless (defined $response)
662 354 841 unless (defined $self->{'filter_callback'})
677 1195 2418 if not defined $next or $next eq ''
715 280 140 if ($self->{'scheduler_type'} =~ /^(WRR|WeightedRandom)$/msx)
719 210 210 if ($self->{'use_timeouts'})
754 0 0 unless $cache_object->get('1234') eq 'test'
757 0 0 if (not $result or $@)
766 0 0 unless $cache_object->get('abc')->{'b'} == 2
769 0 0 if (not $result or $@)
788 0 2100 if ($location and $cache)
805 0 2100 if ($cache and $location)
808 0 0 if ($Response)
825 0 0 if ($self->{'normalize_code_ref'})