Branch Coverage

blib/lib/WebService/Hexonet/Connector/APIClient.pm
Criterion Covered Total %
branch 58 70 82.8


line true false branch
54 0 0 if (defined $logger and $logger->can('log'))
78 18 32 if (defined $secured and $secured == 1)
82 49 1 if (ref $cmd eq 'HASH') { }
84 90 1 if (defined $cmd->{$key})
93 18 32 if (defined $secured and $secured == 1)
97 2 48 if (utf8::is_utf8($tmp))
108 1 1 if (length $sessid)
123 1 19 unless (length $self->{'ua'})
139 1 1 if (defined $modules and length $modules > 0)
149 1 18 if (exists $self->{'curlopts'}{'PROXY'})
158 1 1 if (length $proxy == 0) { }
169 1 18 if (exists $self->{'curlopts'}{'REFERER'})
178 1 1 if (length $referer == 0) { }
260 1 2 if ($rr->isSuccess)
263 1 0 if (defined $col)
277 1 0 unless (defined $otpc)
286 1 0 if ($rr->isSuccess)
289 1 0 if (defined $col)
302 1 1 if ($rr->isSuccess)
326 0 17 if ($referer)
330 0 17 if ($proxy)
335 16 1 if ($r->is_success) { }
337 2 14 if ($self->{'debugMode'})
342 0 1 if ($self->{'debugMode'})
353 0 6 if (defined $mycmd->{'LAST'})
357 5 1 if (defined $mycmd->{'FIRST'})
363 5 1 if ($first < $total)
435 1 33 if ($newkey ne $key)
438 3 31 if (ref $cmd->{$newkey} eq 'ARRAY')
455 1 16 if ($cmd->{'COMMAND'} =~ /^CONVERTIDN$/imsux)
459 14 2 if (scalar @keys == 0)
466 1 4 if ($val =~ /[^[:lower:]\d. -]/imsux)
471 1 1 if (scalar @toconvert == 0)
479 1 0 if ($r->isSuccess)
481 1 0 if ($col)