Condition Coverage

blib/lib/Flickr/API.pm
Criterion Covered Total %
condition 38 86 44.1


and 2 conditions

line l !l condition
485 0 0 carp("\nThe 'perms' parameter must be one of: read, write, delete\n") and return
511 0 1 carp("\nThe 'perms' parameter must be one of: read, write, delete\n") and return

and 3 conditions

line !l l&&!r l&&r condition
77 2 0 2 defined $args->{'token'} and defined $args->{'token_secret'}
91 4 0 0 defined $args->{'request_token'} and ref $args->{'request_token'} eq "Net::OAuth::V1_0A::RequestTokenResponse"
97 4 0 0 defined $args->{'access_token'} and ref $args->{'access_token'} eq "Net::OAuth::AccessTokenResponse"
232 0 0 2 defined $self->{'api_secret'} and length $self->{'api_secret'}
485 0 0 0 defined $oauth{'perms'} and $oauth{'perms'} =~ /^(read|write|delete)$/
511 0 1 4 defined $perms and $perms =~ /^(read|write|delete)$/
514 1 0 3 defined $self->{'api_secret'} and length $self->{'api_secret'}
626 0 25 7 defined $self->{'api_type'} and $self->{'api_type'} eq "oauth"
638 0 0 2 defined $self->{'api_type'} and $self->{'api_type'} eq "oauth"

or 2 conditions

line l !l condition
43 0 4 $args->{'rest_uri'} || 'https://api.flickr.com/services/rest/'
44 0 4 $args->{'auth_uri'} || 'https://api.flickr.com/services/oauth/authorize'
45 0 4 $args->{'upload_uri'} || 'https://api.flickr.com/services/upload/'
55 0 4 $args->{'unicode'} || 0
59 1 3 $args->{'request_method'} || 'GET'
64 1 3 $args->{'signature_method'} || 'HMAC-SHA1'
110 0 4 $args->{'rest_uri'} || 'https://api.flickr.com/services/rest/'
111 0 4 $args->{'auth_uri'} || 'https://api.flickr.com/services/auth/'
112 0 4 $args->{'upload_uri'} || 'https://api.flickr.com/services/upload/'
113 0 4 $args->{'unicode'} || 0
442 0 0 $args->{'request_token_url'} || 'https://api.flickr.com/services/oauth/request_token'
443 0 0 $args->{'callback'} || 'https://127.0.0.1'
482 0 0 lc $args->{'perms'} || 'read'
564 0 0 $args->{'access_token_url'} || 'https://api.flickr.com/services/oauth/access_token'

or 3 conditions

line l !l&&r !l&&!r condition
63 1 3 0 $args->{'nonce'} || _make_nonce()
65 1 3 0 $args->{'timestamp'} || time
108 1 3 0 $args->{'api_key'} || $args->{'key'}
109 2 1 1 $args->{'api_secret'} || $args->{'secret'}
115 3 0 1 defined $args->{'key'} or defined $self->{'key'}
122 1 0 3 defined $args->{'secret'} or defined $self->{'secret'}
174 0 0 0 defined $args->{'token'} or defined $args->{'token_secret'}
181 0 0 0 defined $args->{'consumer_key'} or defined $args->{'consumer_secret'}
291 0 0 0 $self->api_permissions eq "write" or $self->api_permissions eq "delete"