Condition Coverage

blib/lib/Furl/HTTP/OAuth.pm
Criterion Covered Total %
condition 5 33 15.1


and 2 conditions

line l !l condition
397 0 0 $reftype eq 'GLOB' and *{$fh;}{'IO'}

and 3 conditions

line !l l&&!r l&&r condition
124 0 0 0 @_ == 1 and ref $_[0] eq 'HASH'
316 0 5 0 $port && ($port == 443 || $port == 80)
327 5 0 0 $content and $c_reftype
5 0 0 $content and $c_reftype and not _is_real_fh($content)
0 0 0 $content and $c_reftype and not _is_real_fh($content) and $c_reftype eq 'HASH' || $c_reftype eq 'ARRAY'

or 2 conditions

line l !l condition
146 0 1 delete $opts{'nonce'} || sub { my(@chars) = (('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z'), ('a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z')); my $str = ''; $str .= $chars[int rand scalar @chars] foreach (1 .. 8); return $str; }
151 0 1 delete $opts{'timestamp'} || sub { return time; }
185 0 0 $self->signature_method || ''
382 0 0 $args{'consumer_secret'} || ''
383 0 0 $args{'token_secret'} || ''

or 3 conditions

line l !l&&r !l&&!r condition
327 0 0 0 $c_reftype eq 'HASH' || $c_reftype eq 'ARRAY'
397 0 0 0 $reftype eq 'IO' or $reftype eq 'GLOB' and *{$fh;}{'IO'}