Branch Coverage

blib/lib/Facebook/OpenGraph.pm
Criterion Covered Total %
branch 89 112 79.4


line true false branch
59 3 43 $self->is_beta ? :
69 3 6 $self->is_beta ? :
79 1 3 $self->is_beta ? :
91 51 8 unless $param_ref
101 0 5 unless $signed_request
102 1 4 unless $self->secret
118 0 4 unless uc $val->{'algorithm'} eq 'HMAC-SHA256'
124 0 4 unless $sig eq $expected_sig
139 1 5 unless $self->redirect_uri and $self->app_id
144 4 1 if (my $scope_ref = ref $param_ref->{'scope'})
145 1 3 unless $scope_ref eq 'ARRAY'
199 0 2 unless $code
200 0 2 unless $self->redirect_uri
212 1 3 unless $cookie_value
225 1 2 unless $parsed_signed_request->{'code'}
241 0 3 unless $short_term_token
253 4 6 unless $self->app_id and $self->secret
270 1 5 if ($response->is_api_version_eq_or_later_than('v2.3'))
281 0 5 unless $token_ref->{'access_token'}
314 1 1 $response->is_modified ? :
348 0 13 unless $response->is_success
365 1 5 unless $self->access_token
372 3 0 if ($q->{'method'} eq 'POST' and $q->{'body'})
415 40 0 unless &blessed($uri) and $uri->isa('URI')
419 9 31 unless $param_ref
424 1 39 if ($self->use_appsecret_proof)
434 2 38 if ($self->{'use_post_method'})
445 19 21 if ($self->access_token)
453 23 17 if ($method eq 'POST') { }
454 5 18 if ($param_ref->{'source'} or $param_ref->{'file'} or $param_ref->{'upload_phase'}) { }
462 3 2 if ($uri->path =~ m[\A /.+/videos \z]msx)
503 36 4 if $res->is_success
508 0 4 if ($res->req_headers)
518 0 2 unless $self->secret
519 0 2 unless $self->access_token
528 4 52 unless $path
530 5 51 if ($self->version and not $path =~ m[\A /v(?:\d+)\.(?:\d+)/ ]x)
542 1 1 unless $self->app_id
570 1 43 if (my $ids = $param_ref->{'ids'})
571 1 0 ref $ids ? :
575 5 39 if (my $perms = $param_ref->{'permissions'})
576 4 1 ref $perms ? :
581 3 41 if (my $path = $param_ref->{'source'})
582 0 3 ref $path ? :
584 1 43 if (my $path = $param_ref->{'file'})
585 0 1 ref $path ? :
587 1 43 if (my $path = $param_ref->{'video_file_chunk'})
588 0 1 ref $path ? :
592 2 42 if (my $field_ref = $param_ref->{'fields'})
599 1 43 if ($object and ref $object eq 'HASH')
612 3 1 if (not $ref) { }
1 0 elsif ($ref eq 'ARRAY') { }
0 0 elsif ($ref eq 'HASH') { }
622 0 0 $r && $r eq 'HASH' ? :
634 0 1 unless $self->namespace
652 1 1 if (ref $settings_ref ne 'ARRAY')