line |
true |
false |
branch |
43
|
0 |
4 |
if $self->_filtered_content |
44
|
2 |
2 |
unless $self->content_ref |
45
|
1 |
1 |
unless $self->content_filter and ref $self->content_filter |
53
|
2 |
2 |
$self->content_ref ? : |
69
|
0 |
6 |
if ($url) |
75
|
0 |
0 |
!($k =~ /^oauth_/) ? : |
90
|
3 |
5 |
$self->privateapi ? : |
95
|
2 |
8 |
if $self->_url |
98
|
1 |
7 |
unless $self->_levels |
104
|
0 |
0 |
unless $self->_params |
105
|
0 |
0 |
$self->access_token ? : |
113
|
0 |
0 |
unless (my $res = $self->__OAuth_Request($which, 'request_url', $self->url, 'request_method', $method, 'token', $self->access_token, 'token_secret', $self->access_secret, 'extra_params', \%options)) |
144
|
2 |
4 |
if ($url =~ s/\?(.+)//) |
175
|
0 |
0 |
unless ($request = $self->__OAuth_Request('request token', 'request_url', $self->_base_url . '/oauth/request_token', 'request_method', 'POST')) |
180
|
0 |
0 |
unless my $request_token = $response->token |
201
|
0 |
0 |
unless (my $request = $self->__OAuth_Request('access token', 'request_url', $self->_base_url . '/oauth/access_token', 'request_method', 'POST', 'token', $args{'oauth_token'}, 'token_secret', $args{'token_secret'})) |
216
|
0 |
0 |
if ($self->content) |
262
|
0 |
0 |
if ($method eq 'GET') { } |
|
0 |
0 |
elsif ($method eq 'POST') { } |
|
0 |
0 |
elsif ($method eq 'DELETE') { } |
273
|
0 |
0 |
$self->content_filter && !ref($self->content_filter) ? : |
275
|
0 |
0 |
if (not $response->is_success) { } |
|
0 |
0 |
elsif (not length ${$response->content_ref;}) { } |
305
|
22 |
0 |
if ($dir ne 'destroy') |
307
|
3 |
19 |
if scalar @_ |
308
|
5 |
17 |
if exists $$self{'append'}{$dir} |