line |
true |
false |
branch |
38
|
5 |
0 |
unless (ref $code eq 'CODE') |
40
|
3 |
2 |
$mode eq '<' ? : |
54
|
1 |
4 |
if (defined $$arg{'failure'} and not ref $$arg{'failure'}) |
56
|
0 |
1 |
unless my $carpage = 'Carp'->can($$arg{'failure'}) |
76
|
1 |
2 |
if (not ref $code or &blessed($code) and $code->isa('URI')) |
82
|
3 |
0 |
if (&blessed($code) and $code->isa('HTTP::Request')) |
85
|
0 |
3 |
exists $args{'bytes'} ? : |
91
|
1 |
3 |
if $done |
95
|
2 |
1 |
if ($res->is_success) |
97
|
2 |
0 |
if $bytes |
102
|
1 |
0 |
if $args{'failure'} |
115
|
1 |
1 |
if (not ref $code or &blessed($code) and $code->isa('URI')) |
121
|
2 |
0 |
if (&blessed($code) and $code->isa('HTTP::Request')) |
124
|
0 |
2 |
exists $args{'bytes'} ? : |
131
|
2 |
2 |
if (length $str) |
133
|
2 |
0 |
$bytes ? : |
141
|
2 |
0 |
if ($res->is_success) |
143
|
2 |
0 |
if $args{'success'} |
148
|
0 |
0 |
if $args{'failure'} |