| line |
true |
false |
branch |
|
323
|
0 |
0 |
unless $sr->status |
|
327
|
0 |
0 |
if ($args{'uri'}) { } |
|
330
|
0 |
0 |
if ($args{'url'}) { } |
|
340
|
0 |
0 |
unless ($ua) |
|
358
|
0 |
0 |
if ($args{'redirect'}{$turl}) { } |
|
365
|
0 |
0 |
unless $r->header('location') |
|
367
|
0 |
0 |
if $userinfo |
|
372
|
0 |
0 |
if ($dst_url) |
|
392
|
0 |
0 |
if defined $user |
|
405
|
0 |
0 |
if defined $e |
|
411
|
0 |
0 |
if defined $s |
|
417
|
0 |
0 |
if defined $c |
|
423
|
0 |
0 |
if defined $l |
|
437
|
0 |
0 |
unless $res |
|
440
|
0 |
0 |
$rtime ? : |
|
452
|
0 |
0 |
if (defined $v) |
|
493
|
0 |
0 |
if defined $path |
|
497
|
0 |
0 |
if ($method eq 'POST') { } |
|
|
0 |
0 |
elsif ($method eq 'PUT') { } |
|
498
|
0 |
0 |
unless (defined $data and is_hash($data) || !ref($data)) |
|
502
|
0 |
0 |
if (is_hash($data)) { } |
|
512
|
0 |
0 |
if (defined $req_content and not ref $req_content) { } |
|
521
|
0 |
0 |
if (length $data) { } |
|
527
|
0 |
0 |
unless ($fh) |
|
528
|
0 |
0 |
unless open $fh, '<', $file |
|
533
|
0 |
0 |
if ($n) |
|
548
|
0 |
0 |
$data && ref $data eq 'CODE' ? : |
|
549
|
0 |
0 |
$is_callback ? : |
|
554
|
0 |
0 |
$res->is_success ? : |
|
560
|
0 |
0 |
unless $stat |
|
569
|
0 |
0 |
if $self->{'verbose'} and defined $req->content and length $req->content |
|
576
|
0 |
0 |
if $self->{'verbose'} and defined $res->content and length $res->content |
|
580
|
0 |
0 |
if $no_json_response or $method eq 'HEAD' |
|
584
|
0 |
0 |
unless length $content |
|
586
|
0 |
0 |
unless ($sr->status) |
|
587
|
0 |
0 |
if ($stat) |
|
593
|
0 |
0 |
if $structure and ref $structure eq 'HASH' |
|
594
|
0 |
0 |
if ($stat) |
|
596
|
0 |
0 |
if ($err) |
|
608
|
0 |
0 |
unless ($self->status) |
|
610
|
0 |
0 |
if ($code >= 400) |
|
612
|
0 |
0 |
if (-e $cachefn and -f $cachefn) |
|
618
|
0 |
0 |
unless $self->status |
|
625
|
0 |
0 |
unless $self->status |
|
627
|
0 |
0 |
unless defined $filter and $filter ne '' |
|
628
|
0 |
0 |
if $_->{'filename'} |
|
634
|
0 |
0 |
if ($filename_or_id and $filename_or_id =~ /^([0-9]{8})$/) { } |
|
|
0 |
0 |
elsif ($filename_or_id) { } |
|
645
|
0 |
0 |
unless $self->status |
|
648
|
0 |
0 |
if ($id) |
|
649
|
0 |
0 |
if $_->{'date_sfx'} |
|
650
|
0 |
0 |
unless $ret |
|
653
|
0 |
0 |
if $_->{'filename'} |
|
654
|
0 |
0 |
unless $ret |
|
661
|
0 |
0 |
unless (defined $file and length $file) |
|
679
|
0 |
0 |
if ($req_object ne $res_object) |
|
688
|
0 |
0 |
unless (defined $file and length $file) |
|
696
|
0 |
0 |
if ($self->{'updpath'}) { } |
|
707
|
0 |
0 |
if ($req_object ne $res_object) |
|
714
|
0 |
0 |
if ($out_md5) |
|
716
|
0 |
0 |
unless ($in_md5 eq $out_md5) |
|
723
|
0 |
0 |
if ($out_sha1) |
|
725
|
0 |
0 |
unless ($in_sha1 eq $out_sha1) |
|
736
|
0 |
0 |
unless (defined $file and length $file) |
|
744
|
0 |
0 |
if ($self->{'rmvpath'}) { } |
|
759
|
0 |
0 |
unless (defined $file and length $file) |
|
767
|
0 |
0 |
if ($self->{'dldpath'}) { } |
|
781
|
0 |
0 |
unless (defined $f_init) |
|
784
|
0 |
0 |
unless (fileno FILE_DOWNLOAD) |
|
785
|
0 |
0 |
unless open FILE_DOWNLOAD, '>', $file |
|
790
|
0 |
0 |
unless print FILE_DOWNLOAD $buf |
|
794
|
0 |
0 |
if (fileno FILE_DOWNLOAD) |
|
795
|
0 |
0 |
unless close FILE_DOWNLOAD |
|
796
|
0 |
0 |
if ($length and $size != $length) { } |
|
806
|
0 |
0 |
if ($res->header('X-Died') or not $res->is_success) |
|
807
|
0 |
0 |
if (my $died = $res->header('X-Died')) { } |
|
817
|
0 |
0 |
$self->status ? : |
|
827
|
0 |
0 |
if (is_hash($res)) { } |
|
828
|
0 |
0 |
if value($res, 'status') |
|
831
|
0 |
0 |
if (is_hash($err)) |
|
847
|
0 |
0 |
if ($hours) { } |
|
|
0 |
0 |
elsif ($mins >= 2) { } |
|
|
0 |
0 |
elsif ($secs < 120) { } |
|
860
|
0 |
0 |
if ($n >= 1048576) { } |
|
|
0 |
0 |
elsif ($n >= 1024) { } |
|
872
|
0 |
0 |
if ($info) |
|
892
|
0 |
0 |
if $self->{'x_userinfo'} |
|
896
|
0 |
0 |
if ($user) { } |
|
|
0 |
0 |
elsif (-f $cachefn and -r _ and -s _) { } |
|
|
0 |
0 |
elsif (-t STDIN) { } |
|
901
|
0 |
0 |
unless (defined $user and length $user) |
|
910
|
0 |
0 |
unless length $user |
|
917
|
0 |
0 |
unless $password =~ /\:/ |