Branch Coverage

blib/lib/WWW/Lovefilm/API.pm
Criterion Covered Total %
branch 21 52 40.3


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}