| line |
true |
false |
branch |
|
17
|
0 |
5 |
ref $_[0] ? : |
|
18
|
0 |
5 |
unless my $params = _HASH0(shift @_) |
|
20
|
0 |
5 |
unless my $server = delete $$params{'server'} |
|
22
|
0 |
5 |
unless ($server =~ m[^\w+://]) |
|
45
|
0 |
3 |
if ($password) |
|
76
|
0 |
5 |
unless not defined $params or _HASH0 $params |
|
78
|
0 |
5 |
if ref $url |
|
80
|
3 |
2 |
if ($$self{'_user'}) |
|
87
|
1 |
4 |
if ($url =~ /\?$/) { } |
|
|
1 |
3 |
elsif ($url =~ /\?/) { } |
|
96
|
5 |
0 |
unless ($url =~ m[^http://]) |
|
103
|
0 |
5 |
if ($content) { } |
|
|
0 |
5 |
elsif ($method eq 'POST' or $method eq 'PUT') { } |
|
104
|
0 |
0 |
if ($method eq 'GET' or $method eq 'HEAD') |
|
114
|
0 |
5 |
if $timer |
|
116
|
0 |
5 |
if $timer |