Branch Coverage

blib/lib/Net/Mollom.pm
Criterion Covered Total %
branch 25 56 44.6


line true false branch
136 3 0 unless $self->servers_init
196 1 2 unless %args and map {defined $args{$_};} keys %args
199 2 0 unless $self->servers_init
205 0 0 $$results{'spam'} == 1 ? :
0 0 $$results{'spam'} == 2 ? :
0 0 $$results{'spam'} == 3 ? :
259 0 0 unless $self->servers_init
296 2 0 unless $self->servers_init
335 1 0 unless $self->servers_init
374 0 0 unless $self->servers_init
394 0 12 if (@list) { }
12 0 elsif (not $self->servers_init) { }
439 1 0 unless $self->servers_init
449 10 5 if (not $$self{'_recurse_level'}) { }
455 10 5 unless ($self->xml_rpc)
457 0 10 if $@
467 0 0 if ($function ne 'getServerList' and $function ne 'verifyKey' and $function ne 'getStatistics' and $self->session_id)
476 7 8 if $@
479 4 4 if (ref $results and ref $results eq 'HASH' and $$results{'faultCode'}) { }
481 2 2 if ($fault_code == $ERROR_REFRESH_SERVERS and $$self{'_recurse_level'} < $MAX_API_TRIES) { }
0 2 elsif ($fault_code == $ERROR_NEXT_SERVER and $$self{'_recurse_level'} < $MAX_API_TRIES) { }
2 0 elsif ($$self{'_recurse_level'} < $MAX_API_TRIES) { }
482 0 2 if ($function eq 'getServerList') { }
491 0 0 if $self->warnings
493 0 0 if ($servers[$next_index]) { }
498 0 0 if ($self->attempt_limit > $self->attempts) { }
500 0 0 if $self->warnings
529 1 3 unless $function eq 'getServerList'