Condition Coverage

blib/lib/WWW/Facebook/API.pm
Criterion Covered Total %
condition 29 60 48.3


and 3 conditions

line !l l&&!r l&&r condition
256 0 0 0 $url =~ m[^https?://([^/]*\.)?facebook\.com(:\d+)?]imsx and $self->session_uid
403 0 6 1 not $$params{'callback'} and $self->callback
474 0 4 0 $self->parse and $self->format eq 'XML'
488 4 0 0 ref $response eq 'HASH' and not keys %{$response;}
489 4 0 0 ref $response eq 'ARRAY' and @{$response;} == 0

or 2 conditions

line l !l condition
314 1 3 shift() || 'www'
418 1 3 delete $args{'params'} || {}
500 0 0 $filename || 'filename'

or 3 conditions

line l !l&&r !l&&!r condition
103 21 0 6 $$self{'app_path'} || $self->app_path
138 0 4 0 $ENV{$key} ||= $val
153 0 3 0 $$self{$ENV_VARS{$_}} ||= $ENV{$_ . $app_path}
156 0 4 0 $$self{$ENV_VARS{$_}} ||= $ENV{$_}
165 0 26 0 ref $self || $self
169 0 26 0 $$self{'ua'} ||= 'LWP::UserAgent'->new('agent', "Perl-WWW-Facebook-API/$VERSION")
239 1 2 1 $args{'secret'} || $self->secret
402 1 4 2 $$params{'session_key'} ||= $self->session_key
409 0 8 0 $$params{'v'} ||= $self->api_version
411 0 16 0 $$params{$_} ||= $self->$_
420 1 0 3 $$params{'secret'} ||= $self->secret
421 1 3 0 $$params{'method'} ||= $method
470 0 0 4 $self->desktop or $self->parse