Condition Coverage

blib/lib/Net/Proxy/Type.pm
Criterion Covered Total %
condition 32 110 29.0


and 3 conditions

line !l l&&!r l&&r condition
243 1 0 0 $code == 407 and $$self{'noauth'}
283 4 0 0 $code == 407 and $$self{'noauth'} || $$self{'connect_strict'}
286 1 0 3 $code < 200 || $code >= 300 and $code != 407
322 2 0 0 $code == 407 and $$self{'noauth'} || $$self{'https_strict'}
325 2 0 0 $code < 200 || $code >= 300 and $code != 407
470 0 1 0 (caller 1)[3] eq 'Net::Proxy::Type::is_http' and $code == 407
1 0 0 (caller 1)[3] eq 'Net::Proxy::Type::is_http' and $code == 407 and $$self{'noauth'}
492 0 0 0 $! != 11 and $! != 11
533 0 0 0 $! != 11 and $! != 11
538 0 0 7 defined $str_limit and ($limit_idx = index($_[0], $str_limit)) != -1
539 1 0 7 defined $limit_idx and $limit_idx >= 0

or 2 conditions

line l !l condition
338 0 0 $$self{'https_pathquery'} || '/'

or 3 conditions

line l !l&&r !l&&!r condition
48 0 0 1 $opts{'connect_timeout'} || $opts{'timeout'} || $CONNECT_TIMEOUT
49 0 0 1 $opts{'write_timeout'} || $opts{'timeout'} || $WRITE_TIMEOUT
50 0 0 1 $opts{'read_timeout'} || $opts{'timeout'} || $READ_TIMEOUT
51 0 0 1 $opts{'http_strict'} || $opts{'strict'}
52 0 0 1 $opts{'https_strict'} || $opts{'strict'}
53 0 0 1 $opts{'connect_strict'} || $opts{'strict'}
54 0 0 1 $opts{'socks4_strict'} || $opts{'strict'}
55 0 0 1 $opts{'socks5_strict'} || $opts{'strict'}
56 0 0 1 $opts{'http_ver'} || $HTTP_VER
57 0 0 1 $opts{'keyword'} || $KEYWORD
58 0 0 1 $opts{'https_keyword'} || $HTTPS_KEYWORD
60 0 0 1 $opts{'url'} || $URL
61 0 0 1 $opts{'https_url'} || $HTTPS_URL
248 0 0 1 not $rc or substr($buf, 0, 4) ne 'HTTP'
283 0 0 0 $$self{'noauth'} || $$self{'connect_strict'}
286 0 3 1 $code < 200 || $code >= 300
322 0 0 0 $$self{'noauth'} || $$self{'https_strict'}
325 0 0 2 $code < 200 || $code >= 300
371 1 0 0 not $rc or substr($buf, 0, 1) ne "\000"
1 0 0 not $rc or substr($buf, 0, 1) ne "\000" or substr($buf, 1, 1) ne 'Z'
412 0 0 0 $c eq "\cA" or $c eq "\cB"
0 0 0 $c eq "\cA" or $c eq "\cB" or $c eq "\377"
414 0 0 0 $$self{'noauth'} or $$self{'socks5_strict'}
430 0 0 0 not $rc or substr($buf, 1, 1) ne "\000"
538 1 0 7 $num_limit == 0 or defined $str_limit and ($limit_idx = index($_[0], $str_limit)) != -1