| line |
true |
false |
branch |
|
37
|
0 |
3 |
unless $res |
|
42
|
1 |
0 |
if $res->code >= 400 and $res->code < 500 and $res->code != 404 |
|
43
|
0 |
2 |
unless $res->is_success |
|
44
|
0 |
2 |
unless (wantarray) |
|
49
|
1 |
1 |
if ($ct =~ /charset\s*=\>?\s*\"?([\w-]+)/i) |
|
64
|
0 |
0 |
unless $response |
|
67
|
0 |
0 |
unless $length |
|
77
|
0 |
0 |
unless $res |
|
79
|
0 |
0 |
unless $res->is_success |
|
80
|
0 |
0 |
unless wantarray |
|
83
|
0 |
0 |
if ($ct =~ /charset=\"?(.*)\"?$/) |
|
94
|
1 |
0 |
unless $res->is_success |
|
95
|
0 |
0 |
unless wantarray |
|
98
|
0 |
0 |
if ($ct =~ /charset=\"?(.*)\"?$/) |
|
108
|
0 |
2 |
if $HANDLERS |
|
125
|
0 |
3 |
if (ref $param) { } |
|
126
|
0 |
0 |
if ($param->{'data'}) { } |
|
|
0 |
0 |
elsif ($param->{'url'}) { } |
|
128
|
0 |
0 |
if ref $data |
|
141
|
0 |
0 |
unless ($url or $data) |
|
147
|
3 |
0 |
unless ($data) |
|
149
|
0 |
3 |
if (-e $url) { } |
|
151
|
0 |
0 |
unless (open DATA, $url) |
|
161
|
0 |
3 |
if ($url =~ s/^itms:/http:/) { } |
|
175
|
1 |
2 |
unless ($data) |
|
180
|
0 |
2 |
unless $data |
|
186
|
0 |
2 |
unless my $handler = $handlers->{$type} || $handlers->{'default'} |