| blib/lib/Net/Hadoop/WebHDFS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 12 | 82 | 14.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 579 | 2 | 1 | 5 | $res->{'code'} == 200 and $res->{'content_type'} =~ m[^application/json] |
| 616 | 0 | 0 | 0 | $self->{'httpfs_mode'} and defined $payload |
| 624 | 0 | 0 | 0 | $res->{'code'} >= 300 and $res->{'code'} <= 399 |
| 0 | 0 | 0 | $res->{'code'} >= 300 and $res->{'code'} <= 399 and $res->{'location'} | |
| 675 | 0 | 0 | 0 | $code >= 200 and $code <= 299 |
| 676 | 0 | 0 | 0 | $code >= 300 and $code <= 399 |
| 729 | 0 | 0 | 0 | @_ && ref $_[-1] eq 'HASH' |
| 758 | 0 | 0 | 0 | $re_ignore and $path |
| 0 | 0 | 0 | $re_ignore and $path and $path =~ /$re_ignore/ |
| line | l | !l | condition |
|---|---|---|---|
| 32 | 0 | 5 | $opts{'host'} || 'localhost' |
| 0 | 5 | $opts{'port'} || 50070 | |
| 0 | 5 | $opts{'standby_port'} || $opts{'port'} || 50070 | |
| 0 | 5 | $opts{'httpfs_mode'} || 0 | |
| 0 | 5 | $opts{'useragent'} || 'Furl Net::Hadoop::WebHDFS (perl)' | |
| 0 | 5 | $opts{'timeout'} || 10 | |
| 0 | 5 | $opts{'suppress_errors'} || 0 | |
| 568 | 0 | 0 | $OPT_TABLE{$op} || [] |
| 678 | 0 | 0 | $res->{'body'} || 'Response body is empty...' |
| 715 | 0 | 0 | $@ || 'Zombie error' |
| 766 | 0 | 0 | $@ || 'Zombie error' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 197 | 0 | 0 | 0 | defined $options{'owner'} or defined $options{'group'} |
| 229 | 0 | 0 | 0 | defined $options{'modificationtime'} or defined $options{'accesstime'} |
| 244 | 0 | 0 | 0 | $self->can($target) || $self->can($target2) || croak("invalid action `$action`") |
| 303 | 0 | 0 | 0 | delete $options{'name'} || croak('name of xattr not set') |
| 338 | 0 | 0 | 0 | $name || croak('xattr name was not specified') |
| 453 | 0 | 0 | 0 | $options{'renewer'} ||= $self->{'username'} |
| 579 | 1 | 0 | 4 | not defined $attr or &JSON::XS::decode_json($res->{'body'})->{$attr} |
| 614 | 0 | 0 | 0 | $self->{'httpfs_mode'} or not $REDIRECTED_OPERATIONS{$op} |
| 685 | 0 | 0 | 0 | $self->{'httpfs_mode'} or not defined $self->{'standby_host'} |
| 709 | 0 | 0 | 0 | shift() || croak('No HDFS path was specified') |
| 727 | 0 | 0 | 0 | shift() || croak('No file path specified') |