Condition Coverage

blib/lib/File/HTTP.pm
Criterion Covered Total %
condition 0 149 0.0


and 3 conditions

line !l l&&!r l&&r condition
147 0 0 0 defined $arg and ref $arg
341 0 0 0 $offset and $_[0]
420 0 0 0 $self->[17] && &File::HTTP::time() - $self->[19] <= $MAX_SEC_NO_CLOSE
435 0 0 0 defined $headers and $headers eq "HTTP/"
466 0 0 0 $self->[4] > $self->[5] and $self->[4] - $self->[5] < $MAX_LENGTH_SKIP + $self->[21]
485 0 0 0 $REQUEST_HEADERS && ref $REQUEST_HEADERS
516 0 0 0 $DEBUG_SLOW_CONNECTION && &File::HTTP::time()
518 0 0 0 $DEBUG_SLOW_CONNECTION and &File::HTTP::time() - $t >= "0.4"
522 0 0 0 $_ < 3 and $! =~ /Interrupted system call/i
566 0 0 0 $code =~ /^3/ and $RESPONSE_HEADERS =~ /\015?\012Location: ([^\015\012]+)/i
570 0 0 0 $RESPONSE_HEADERS =~ /\015?\012Content-Length: (\d+)/i && $1
571 0 0 0 $code =~ /^200$|^416$/ and $self->[4] >= $self->[6]
576 0 0 0 $VERBOSE and $code == 200
581 0 0 0 $RESPONSE_HEADERS =~ /\015?\012Transfert-Encoding: +chunked/i and $self->[16] <= 1
621 0 0 0 $self->[22] and $len
0 0 0 $self->[22] and $len and $n < $len
667 0 0 0 $no_proxy and $self->[2] =~ /$no_proxy$/i
732 0 0 0 defined $self->[4] and not defined $self->[6]

or 2 conditions

line l !l condition
183 0 0 $dir || ''
208 0 0 $dir || ''
232 0 0 tied *$dirh || (return CORE::readdir $dirh)
251 0 0 tied *$dirh || (return CORE::rewinddir $dirh)
262 0 0 tied *$dirh || (return CORE::telldir $dirh)
272 0 0 tied *$dirh || (return CORE::seekdir($dirh, $pos))
283 0 0 tied *$dirh || (return CORE::closedir $dirh)
308 0 0 $file || ''
331 0 0 $offset ||= 0
333 0 0 $file || ''
359 0 0 &open_stream($url) || (return)
379 0 0 $RESPONSE_HEADERS || "HTTP/1.0 502 Bad Gateway\r\nContent-Length: 0\r\n\r\n"
393 0 0 $path ||= "/"
413 0 0 $RESPONSE_HEADERS || "HTTP/1.0 502 Bad Gateway\r\nContent-Length: 0\r\n\r\n"
464 0 0 $self->[21] ||= 0
525 0 0 $self->[18] ||= [CORE::stat $self->[17]]
655 0 0 $self->[8] ||= "/"
665 0 0 $ENV{'NO_PROXY'} || ''
833 0 0 shift() || (return)

or 3 conditions

line l !l&&r !l&&!r condition
184 0 0 0 $_[0] ||= &Symbol::gensym()
209 0 0 0 $_[0] ||= &Symbol::gensym()
310 0 0 0 $_[0] ||= &Symbol::gensym()
334 0 0 0 $_[0] ||= &Symbol::gensym()
392 0 0 0 $port ||= $Proto2Port{$proto}
440 0 0 0 not $headers =~ m[^HTTP/[\d\.]+ (\d+)] or &bytes::length($headers) > $MAX_HEADER_SIZE
450 0 0 0 ++$nb_lines > $MAX_HEADER_LINES or &bytes::length($headers) > $MAX_HEADER_SIZE
534 0 0 0 $TUNNELING_USER_AGENT || $USER_AGENT
570 0 0 0 $self->[6] ||= $RESPONSE_HEADERS =~ /\015?\012Content-Length: (\d+)/i && $1
575 0 0 0 $HTTP2FS_error{$code} || &Errno::ENOSYS
582 0 0 0 $HTTP2FS_error{$code} || &Errno::ENOSYS
654 0 0 0 $self->[7] ||= $Proto2Port{$self->[1]}
663 0 0 0 $ENV{'HTTPS_PROXY'} || $ENV{'HTTP_PROXY'}
667 0 0 0 $self->[2] eq "127.0.0.1" or $self->[2] eq "localhost"
0 0 0 $self->[2] eq "127.0.0.1" or $self->[2] eq "localhost" or $no_proxy and $self->[2] =~ /$no_proxy$/i
682 0 0 0 $self->[7] ||= $Proto2Port{$self->[1]}
843 0 0 0 $self->[18][7] ||= $self->[6]
844 0 0 0 $self->[18][9] ||= $self->_mtime
852 0 0 0 $TIME_GM_CODE ||= do { if (eval { do { require Time::y2038; 1 } }) { \&Time::y2038::timegm; } elsif (eval { do { require Time::Local; 1 } }) { \&Time::Local::timegm; } }