Condition Coverage

blib/lib/Net/OAuth/Message.pm
Criterion Covered Total %
condition 38 59 64.4


and 3 conditions

line !l l&&!r l&&r condition
66 0 33 13 defined $protocol_version and $protocol_version == 1.001
33 4 9 defined $protocol_version and $protocol_version == 1.001 and not $class =~ /\::V1_0A\::/
92 0 4 30 $$self{'extra_params'} and $self->allow_extra_params
105 930 2 1 $str =~ /[\x80-\xFF]/ and not utf8::is_utf8($str)
128 10 32 36 $self->sign_message && grep(($_ eq 'signature'), @{$opts{'add'};})
308 36 42 $k eq 'signature' and not $self->sign_message && grep(($_ eq 'signature'), @{$opts{'add'};})
133 0 4 56 $$self{'extra_params'} and not $opts{'no_extra'}
4 6 50 $$self{'extra_params'} and not $opts{'no_extra'} and $self->allow_extra_params
218 0 0 16 defined $k and defined $v
297 3 0 5 not defined $url and $self->can('request_url')
3 0 5 not defined $url and $self->can('request_url') and defined $self->request_url

or 2 conditions

line l !l condition
75 16 21 $$self{'extra_params'} ||= {}
76 0 29 $$self{'version'} ||= '1.0'
125 0 60 $opts{'params'} ||= []
188 4 0 shift() || ','

or 3 conditions

line l !l&&r !l&&!r condition
53 0 37 0 ref $proto || $proto
65 3 0 43 $$params{'protocol_version'} || $Net::OAuth::PROTOCOL_VERSION
202 1 0 0 ref $proto || $proto
229 0 9 0 ref $proto || $proto
271 2 0 0 ref $proto || $proto
284 0 3 0 ref $proto || $proto