Branch Coverage

blib/lib/Net/Hadoop/WebHDFS.pm
Criterion Covered Total %
branch 8 114 7.0


line true false branch
43 0 0 if ($self->{'httpfs_mode'})
47 0 0 if $err
57 0 0 if ($self->{'httpfs_mode'})
61 0 0 if $err
73 0 0 if $err
85 0 0 if $err
97 0 0 if $err
99 0 0 unless ($dest =~ m[^/])
111 0 0 if $err
122 0 0 if $err
133 0 0 if $err
144 0 0 if $err
155 0 0 if $err
166 0 0 if $err
178 0 0 if $err
190 0 0 if $err
192 0 0 unless (defined $options{'owner'} or defined $options{'group'})
207 0 0 if $err
222 0 0 if $err
224 0 0 unless (defined $options{'modificationtime'} or defined $options{'accesstime'})
248 0 0 if scalar grep({$k eq $_;} @$opts) < 1
250 0 0 unless @ex
257 5 3 if $res->{'code'} == 200 and $res->{'content_type'} =~ m[^application/json]
262 9 1 if $path =~ m[^/]
270 4 3 $self->{'username'} ? :
2 5 $self->{'doas'} ? :
279 0 0 if ($self->{'under_failover'})
292 0 0 if ($self->{'httpfs_mode'} or not $REDIRECTED_OPERATIONS{$op})
294 0 0 if ($self->{'httpfs_mode'} and defined $payload)
302 0 0 unless ($res->{'code'} >= 300 and $res->{'code'} <= 399 and $res->{'location'})
314 0 0 unless $self->{'suppress_errors'}
333 0 0 $op ? :
335 0 0 $payload ? :
349 0 0 if ($header =~ /^location$/i) { }
0 0 elsif ($header =~ /^content-type$/i) { }
353 0 0 if $code >= 200 and $code <= 299
354 0 0 if $code >= 300 and $code <= 399
359 0 0 if ($code == 400) { }
0 0 elsif ($code == 401) { }
0 0 elsif ($code == 403) { }
0 0 elsif ($code == 404) { }
0 0 elsif ($code == 500) { }
362 0 0 if ($errmsg =~ /org\.apache\.hadoop\.ipc\.StandbyException/)
363 0 0 if ($self->{'httpfs_mode'} or not defined $self->{'standby_host'}) { }
0 0 elsif ($self->{'retrying'}) { }
392 0 0 unless (eval { do { $stat = $self->stat($path); 1 } })
394 0 0 if $eval_error =~ / FileNotFoundError\:\ \{\"RemoteException\"\:\{\"message\"\:\"File\ does\ not\ exist\: /msx
407 0 0 @_ && ref $_[-1] eq 'HASH' ? :
409 0 0 if (ref $cb ne 'CODE')
416 0 0 $opt->{'re_ignore'} ? :
426 0 0 unless ($self->exists($thing))
436 0 0 if $re_ignore and $path and $path =~ /$re_ignore/
438 0 0 if ($type eq 'DIRECTORY') { }
0 0 elsif ($type eq 'FILE') { }
443 0 0 unless (eval { do { &$looper('File::Spec'->catdir($thing, $path)); 1 } })
445 0 0 if ($suppress)
457 0 0 if ($suppress)