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 19 33 if (defined $secured and $secured == 1)
82 51 1 if (ref $cmd eq 'HASH') { }
84 92 1 if (defined $cmd->{$key})
93 19 33 if (defined $secured and $secured == 1)
97 2 50 if (utf8::is_utf8($tmp))
108 1 1 if (length $sessid)
123 1 20 unless (length $self->{'ua'})
139 1 1 if (defined $modules and length $modules > 0)
149 1 19 if (exists $self->{'curlopts'}{'PROXY'})
158 1 1 if (length $proxy == 0) { }
169 1 19 if (exists $self->{'curlopts'}{'REFERER'})
178 1 1 if (length $referer == 0) { }
260 2 2 if ($rr->isSuccess)
263 2 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 18 if ($referer)
330 0 18 if ($proxy)
335 17 1 if ($r->is_success) { }
337 2 15 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 34 if ($newkey ne $key)
438 3 32 if (ref $cmd->{$newkey} eq 'ARRAY')
455 1 17 if ($cmd->{'COMMAND'} =~ /^CONVERTIDN$/imsux)
459 15 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)