| line |
true |
false |
branch |
|
45
|
0 |
4 |
if $self->_filtered_content |
|
46
|
2 |
2 |
unless $self->content_ref |
|
47
|
1 |
1 |
unless $self->content_filter and ref $self->content_filter |
|
55
|
2 |
2 |
$self->content_ref ? : |
|
71
|
0 |
3 |
if ($url) |
|
77
|
0 |
0 |
!($k =~ /^oauth_/) ? : |
|
92
|
2 |
5 |
if $self->_url |
|
93
|
1 |
4 |
unless $self->_levels |
|
99
|
0 |
0 |
unless $self->_params |
|
100
|
0 |
0 |
$self->access_token ? : |
|
108
|
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)) |
|
136
|
1 |
2 |
if ($url =~ s/\?(.+)//) |
|
171
|
0 |
0 |
unless ($request = $self->__OAuth_Request('request token', 'request_url', 'http://' . $$self{'base_url'} . '/oauth/request_token', 'request_method', 'POST')) |
|
176
|
0 |
0 |
unless my $request_token = $response->token |
|
193
|
0 |
0 |
unless ($mech->success) |
|
201
|
0 |
0 |
unless ($mech->form_with_fields(keys %fields)) |
|
206
|
0 |
0 |
unless $mech->content =~ /successfully/i and not $mech->content =~ /failed/i |
|
214
|
0 |
0 |
unless ($request = $self->__OAuth_Request('access token', 'request_url', 'http://' . $$self{'base_url'} . '/oauth/access_token', 'request_method', 'POST', 'token', $request_token, 'token_secret', $request_secret)) |
|
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) ? : |
|
274
|
0 |
0 |
if (not $response->is_success) { } |
|
|
0 |
0 |
elsif (not length ${$response->content_ref;}) { } |
|
304
|
15 |
0 |
if ($dir ne 'destroy') |
|
306
|
2 |
13 |
if scalar @_ |
|
307
|
3 |
12 |
if exists $$self{'append'}{$dir} |