Branch Coverage

blib/lib/WebService/Hexonet/Connector/APIClient.pm
Criterion Covered Total %
branch 57 68 83.8


line true false branch
54 0 0 if (defined $logger and $logger->can('log'))
78 20 34 if (defined $secured and $secured == 1)
82 53 1 if (ref $cmd eq 'HASH') { }
84 94 1 if (defined $cmd->{$key})
93 20 34 if (defined $secured and $secured == 1)
97 2 52 if (utf8::is_utf8($tmp))
108 1 1 if (length $sessid)
123 1 21 unless (length $self->{'ua'})
139 1 1 if (defined $modules and length $modules > 0)
149 1 20 if (exists $self->{'curlopts'}{'PROXY'})
158 1 1 if (length $proxy == 0) { }
169 1 20 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 19 if ($referer)
330 0 19 if ($proxy)
335 18 1 if ($r->is_success) { }
337 2 16 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 36 if ($newkey ne $key)
438 4 33 if (ref $cmd->{$newkey} eq 'ARRAY')
455 2 17 if ($cmd->{'COMMAND'} =~ /^CONVERTIDN$/imsux)
459 15 2 if (scalar @keys == 0)
466 1 4 if ($val =~ /[^[:lower:]\d. -]/imsux)
476 1 1 if ($r->isSuccess)
478 1 0 if ($col)