| line |
true |
false |
branch |
|
35
|
0 |
2 |
unless $res |
|
40
|
1 |
0 |
if $res->code >= 400 and $res->code < 500 and $res->code != 404 |
|
41
|
0 |
1 |
unless $res->is_success |
|
42
|
0 |
1 |
unless (wantarray) |
|
47
|
0 |
1 |
if ($ct =~ /charset\s*=\>?\s*\"?([\w-]+)/i) |
|
62
|
0 |
0 |
unless $response |
|
65
|
0 |
0 |
unless $length |
|
75
|
0 |
0 |
unless $res |
|
77
|
0 |
0 |
unless $res->is_success |
|
78
|
0 |
0 |
unless wantarray |
|
81
|
0 |
0 |
if ($ct =~ /charset=\"?(.*)\"?$/) |
|
92
|
1 |
0 |
unless $res->is_success |
|
93
|
0 |
0 |
unless wantarray |
|
96
|
0 |
0 |
if ($ct =~ /charset=\"?(.*)\"?$/) |
|
106
|
0 |
2 |
if $HANDLERS |
|
123
|
0 |
3 |
if (ref $param) { } |
|
124
|
0 |
0 |
if ($param->{'data'}) { } |
|
|
0 |
0 |
elsif ($param->{'url'}) { } |
|
126
|
0 |
0 |
if ref $data |
|
139
|
0 |
0 |
unless ($url or $data) |
|
145
|
3 |
0 |
unless ($data) |
|
147
|
1 |
2 |
if (-e $url) { } |
|
149
|
0 |
1 |
unless (open DATA, $url) |
|
159
|
0 |
2 |
if ($url =~ s/^itms:/http:/) { } |
|
170
|
1 |
2 |
unless ($data) |
|
175
|
0 |
2 |
unless $data |
|
181
|
0 |
2 |
unless my $handler = $handlers->{$type} || $handlers->{'default'} |