Branch Coverage

blib/lib/HBase/JSONRest.pm
Criterion Covered Total %
branch 24 98 24.4


line true false branch
34 0 0 unless (defined $params{'service'})
36 0 0 unless defined $params{'host'}
45 0 0 defined $params{'timeout'} ? :
49 0 0 if ($params{'strict_mode'})
50 0 0 if ($params{'strict_mode'} == 1) { }
86 0 0 if $self->_handle_error($uri, $rs)
114 0 0 if $self->_handle_error($uri, $rs)
152 0 0 if (my $rows = $self->_get_tiny($url->{'url'})) { }
159 0 0 unless $self->{'last_error'} and ($self->{'last_error'}{'type'} // '') eq '404'
183 0 0 if $self->_handle_error($uri, $rs, ['404'])
225 0 0 unless ($where->{'key_in'} and @{$where->{'key_in'};})
240 0 0 if (my $rows = $self->_multiget_tiny($url->{'url'})) { }
247 0 0 unless $self->{'last_error'} and ($self->{'last_error'}{'type'} // '') eq '404'
277 0 0 if $self->_handle_error($uri, $rs, ['404'])
330 0 0 unless ($command->{'table'} and defined $command->{'changes'}[0]{'row_key'} and $command->{'changes'}[0]{'row_cells'})
379 0 0 if ($cell_change->{'timestamp'})
384 0 0 $overide_timestamp ? :
447 0 0 unless $table
448 0 0 unless $key
449 0 0 if $column and not $family
451 0 0 if ref $key eq 'ARRAY'
454 0 0 if ($family)
456 0 0 if $column
480 4 3 if ($query->{'columns'} and @{$query->{'columns'};})
481 1 3 if ($query->{'timestamp_range'} and %{$query->{'timestamp_range'};})
489 4 3 if ($query->{'versions'})
495 7 0 if ($query->{'where'}{'key_equals'}) { }
505 4 3 if ($query->{'columns'} and @{$query->{'columns'};}) { }
508 4 7 if (not defined $current_url) { }
513 4 3 if (length $next_url < 1500) { }
528 4 3 if ($timestamp_url_part or $versions_url_part)
530 1 3 if $timestamp_url_part
531 4 0 if $versions_url_part
552 3 12 if (not defined $current_url) { }
557 9 3 if (length $next_url < 2000) { }
569 1 2 if ($query->{'versions'})
591 0 0 if (my $error = $self->{'last_error'} = _extract_error_tiny($uri, $response))
593 0 0 if ($self->{'strict_mode'})
597 0 0 unless $error->{'type'} and $not_to_die and grep {$_ eq $error->{'type'};} @$not_to_die
614 0 0 if $res->{'success'}
618 0 0 if (my $http_status = $res->{'status'}) { }
620 0 0 if ($http_status == 404) { }
0 0 elsif ($http_status == 599) { }
0 0 elsif ($http_status == 503) { }
642 0 0 if (index($line, 'ThrottlingException') != -1)
663 0 0 if ($res->{'reason'}) { }
676 0 0 if ($exception) { }
688 0 0 if (exists $rs->{'headers'} and exists $rs->{'headers'}{'content-encoding'} and $rs->{'headers'}{'content-encoding'} eq 'gzip')
693 0 0 unless gunzip(\$content, \$content_decompressed, 'MultiStream', 1, 'Append', 1, 'TrailingData', \$scalar)