line |
!l |
l&&!r |
l&&r |
condition |
147
|
0 |
0 |
0 |
defined $arg and ref $arg |
323
|
0 |
0 |
0 |
$offset and $_[0] |
398
|
0 |
0 |
0 |
$self->[17] && &File::HTTP::time() - $self->[19] <= $MAX_SEC_NO_CLOSE |
413
|
0 |
0 |
0 |
defined $headers and $headers eq 'HTTP/' |
444
|
0 |
0 |
0 |
$self->[4] > $self->[5] and $self->[4] - $self->[5] < $MAX_LENGTH_SKIP + $self->[21] |
463
|
0 |
0 |
0 |
$REQUEST_HEADERS && ref $REQUEST_HEADERS |
494
|
0 |
0 |
0 |
$DEBUG_SLOW_CONNECTION && &File::HTTP::time() |
496
|
0 |
0 |
0 |
$DEBUG_SLOW_CONNECTION and &File::HTTP::time() - $t >= 0.4 |
500
|
0 |
0 |
0 |
$_ < 3 and $! =~ /Interrupted system call/i |
544
|
0 |
0 |
0 |
$code =~ /^3/ and $RESPONSE_HEADERS =~ /\015?\012Location: ([^\015\012]+)/i |
548
|
0 |
0 |
0 |
$RESPONSE_HEADERS =~ /\015?\012Content-Length: (\d+)/i && $1 |
549
|
0 |
0 |
0 |
$code =~ /^200$|^416$/ and $self->[4] >= $self->[6] |
554
|
0 |
0 |
0 |
$VERBOSE and $code == 200 |
559
|
0 |
0 |
0 |
$RESPONSE_HEADERS =~ /\015?\012Transfert-Encoding: +chunked/i and $self->[16] <= 1 |
599
|
0 |
0 |
0 |
$self->[22] and $len |
|
0 |
0 |
0 |
$self->[22] and $len and $n < $len |
645
|
0 |
0 |
0 |
$no_proxy and $self->[2] =~ /$no_proxy$/i |
710
|
0 |
0 |
0 |
defined $self->[4] and not defined $self->[6] |
line |
l |
!l |
condition |
159
|
0 |
0 |
TIEHANDLE('File::HTTP', $arg, 0) || (return undef) |
177
|
0 |
0 |
$dir || '' |
179
|
0 |
0 |
tie(*{$_[0];}, 'File::HTTP', $dir, undef) || (return) |
198
|
0 |
0 |
$dir || '' |
200
|
0 |
0 |
tie(*{$_[0];}, 'File::HTTP', $dir, undef) || (return) |
218
|
0 |
0 |
tied *$dirh || (return CORE::readdir $dirh) |
237
|
0 |
0 |
tied *$dirh || (return CORE::rewinddir $dirh) |
248
|
0 |
0 |
tied *$dirh || (return CORE::telldir $dirh) |
258
|
0 |
0 |
tied *$dirh || (return CORE::seekdir($dirh, $pos)) |
269
|
0 |
0 |
tied *$dirh || (return CORE::closedir $dirh) |
294
|
0 |
0 |
$file || '' |
315
|
0 |
0 |
$offset ||= 0 |
317
|
0 |
0 |
$file || '' |
331
|
0 |
0 |
TIEHANDLE('File::HTTP', $url, $offset, 1) || (return undef) |
337
|
0 |
0 |
&open_stream($url) || (return) |
357
|
0 |
0 |
$RESPONSE_HEADERS || "HTTP/1.0 502 Bad Gateway\r\nContent-Length: 0\r\n\r\n" |
371
|
0 |
0 |
$path ||= '/' |
391
|
0 |
0 |
$RESPONSE_HEADERS || "HTTP/1.0 502 Bad Gateway\r\nContent-Length: 0\r\n\r\n" |
442
|
0 |
0 |
$self->[21] ||= 0 |
503
|
0 |
0 |
$self->[18] ||= [CORE::stat $self->[17]] |
633
|
0 |
0 |
$self->[8] ||= '/' |
643
|
0 |
0 |
$ENV{'NO_PROXY'} || '' |
811
|
0 |
0 |
shift() || (return) |
line |
l |
!l&&r |
!l&&!r |
condition |
178
|
0 |
0 |
0 |
$_[0] ||= &Symbol::gensym() |
199
|
0 |
0 |
0 |
$_[0] ||= &Symbol::gensym() |
296
|
0 |
0 |
0 |
$_[0] ||= &Symbol::gensym() |
318
|
0 |
0 |
0 |
$_[0] ||= &Symbol::gensym() |
370
|
0 |
0 |
0 |
$port ||= $Proto2Port{$proto} |
418
|
0 |
0 |
0 |
not $headers =~ m[^HTTP/[\d\.]+ (\d+)] or &bytes::length($headers) > $MAX_HEADER_SIZE |
428
|
0 |
0 |
0 |
++$nb_lines > $MAX_HEADER_LINES or &bytes::length($headers) > $MAX_HEADER_SIZE |
512
|
0 |
0 |
0 |
$TUNNELING_USER_AGENT || $USER_AGENT |
548
|
0 |
0 |
0 |
$self->[6] ||= $RESPONSE_HEADERS =~ /\015?\012Content-Length: (\d+)/i && $1 |
553
|
0 |
0 |
0 |
$HTTP2FS_error{$code} || &Errno::ENOSYS |
560
|
0 |
0 |
0 |
$HTTP2FS_error{$code} || &Errno::ENOSYS |
632
|
0 |
0 |
0 |
$self->[7] ||= $Proto2Port{$self->[1]} |
641
|
0 |
0 |
0 |
$ENV{'HTTPS_PROXY'} || $ENV{'HTTP_PROXY'} |
645
|
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 |
660
|
0 |
0 |
0 |
$self->[7] ||= $Proto2Port{$self->[1]} |
821
|
0 |
0 |
0 |
$self->[18][7] ||= $self->[6] |
822
|
0 |
0 |
0 |
$self->[18][9] ||= $self->_mtime |
830
|
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;
}
} |