line |
!l |
l&&!r |
l&&r |
condition |
50
|
0 |
1 |
0 |
defined $_[2]->header('Connection') and $_[2]->header('Connection') eq 'Keep-Alive' |
58
|
0 |
0 |
0 |
$_[2]->header('Content-Length') && SOAP::Utils::bytelength($$data) == $_[2]->header('Content-Length') |
151
|
11 |
0 |
0 |
exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
178
|
11 |
0 |
0 |
!exists($nocompress{$endpoint}) && $self->options->{'is_compress'} && ($self->options->{'compress_threshold'} || 0) < length $envelope |
226
|
11 |
0 |
0 |
$ENV{'HTTP_proxy_user'} and $ENV{'HTTP_proxy_pass'} |
254
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_USE_CHARSET and $encoding |
255
|
1 |
0 |
10 |
!$SOAP::Constants::DO_NOT_USE_CHARSET && $encoding |
284
|
11 |
0 |
0 |
$self->http_response->code == 510 || $self->http_response->code == 501 and $method ne 'M-POST' |
|
11 |
0 |
0 |
$self->http_response->code == 415 and $compressed |
306
|
11 |
0 |
0 |
$self->http_response->previous and $self->http_response->previous->is_redirect |
319
|
11 |
0 |
0 |
($self->http_response->content_encoding || '') =~ /\b$SOAP::Transport::HTTP::Client::COMPRESS\b/o && $self->options->{'is_compress'} |
360
|
0 |
0 |
0 |
$action and $action ne join('#', @_) |
|
0 |
0 |
0 |
$action and $action ne join('#', @_) and $action ne join('/', @_) |
|
0 |
0 |
0 |
$action and $action ne join('#', @_) and $action ne join('/', @_) and substr($_[0], -1, 1) ne '/' || $action ne join('', @_) |
414
|
0 |
0 |
0 |
$compressed && eval {
do {
require Compress::Zlib
}
} |
418
|
0 |
0 |
0 |
$compressed and not $self->options->{'is_compress'} |
|
0 |
0 |
0 |
not $compressed and ($self->request->content_encoding || '') =~ /\S/ |
429
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' and $content_type ne 'text/xml' |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' and $content_type ne 'text/xml' and $content_type ne 'application/dime' |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' and $content_type ne 'text/xml' and $content_type ne 'application/dime' and not $content_type =~ m[^multipart/] |
441
|
0 |
0 |
0 |
defined $self->request->header('Expect') and $self->request->header('Expect') eq '100-Continue' |
483
|
0 |
0 |
0 |
exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
485
|
0 |
0 |
0 |
$self->options->{'is_compress'} && grep(/\b($SOAP::Transport::HTTP::Server::COMPRESS|\*)\b/, $self->request->header('Accept-Encoding')) && ($self->options->{'compress_threshold'} || 0) < SOAP::Utils::bytelength($response) |
511
|
0 |
0 |
0 |
!$SOAP::Constants::DO_NOT_USE_CHARSET && $encoding |
574
|
0 |
0 |
0 |
defined $SOAP::Constants::MAX_CONTENT_SIZE and $length > $SOAP::Constants::MAX_CONTENT_SIZE |
582
|
0 |
0 |
0 |
exists $ENV{'EXPECT'} and $ENV{'EXPECT'} =~ /\b100-Continue\b/i |
622
|
0 |
0 |
0 |
defined $ENV{'SERVER_SOFTWARE'} && $ENV{'SERVER_SOFTWARE'} =~ /IIS/ |
663
|
0 |
0 |
0 |
not $self->SSL and grep /^SSL_/, @params |
719
|
0 |
0 |
0 |
$@ and not $@ =~ /^SIGPIPE/ |
755
|
0 |
0 |
0 |
defined $ENV{'MOD_PERL_API_VERSION'} and $ENV{'MOD_PERL_API_VERSION'} >= 2 |
line |
l |
!l |
condition |
142
|
11 |
0 |
$encoding ||= 'UTF-8' |
319
|
0 |
11 |
$self->http_response->content_encoding || '' |
359
|
0 |
0 |
shift() || '' |
394
|
0 |
0 |
$self->request->header('SOAPAction') || undef |
404
|
0 |
0 |
$self->request->header("$1-SOAPAction") || undef |
411
|
0 |
0 |
$self->request->content_encoding || '' |
418
|
0 |
0 |
$self->request->content_encoding || '' |
424
|
0 |
0 |
$self->request->content_type || '' |
555
|
0 |
0 |
$ENV{'CONTENT_LENGTH'} || 0 |
559
|
0 |
0 |
defined $ENV{'HTTP_TRANSFER_ENCODING'} && $ENV{'HTTP_TRANSFER_ENCODING'} =~ /^chunked.*$/ || 0 |
607
|
0 |
0 |
$ENV{'REQUEST_METHOD'} || '' |
622
|
0 |
0 |
$ENV{'SERVER_PROTOCOL'} || 'HTTP/1.0' |
line |
l |
!l&&r |
!l&&!r |
condition |
144
|
0 |
11 |
0 |
$endpoint ||= $self->endpoint |
151
|
0 |
0 |
11 |
$self->options->{'is_compress'} ||= exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
284
|
0 |
0 |
11 |
$self->http_response->code == 510 || $self->http_response->code == 501 |
360
|
0 |
0 |
0 |
substr($_[0], -1, 1) ne '/' || $action ne join('', @_) |
414
|
0 |
0 |
0 |
$self->options->{'is_compress'} ||= $compressed && eval {
do {
require Compress::Zlib
}
} |
418
|
0 |
0 |
0 |
$compressed and not $self->options->{'is_compress'} or not $compressed and ($self->request->content_encoding || '') =~ /\S/ |
483
|
0 |
0 |
0 |
$self->options->{'is_compress'} ||= exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
540
|
0 |
0 |
0 |
ref $self || $self |
665
|
0 |
0 |
0 |
eval "require $http_daemon" or Carp::croak($@) |
745
|
0 |
0 |
0 |
ref $self || $self |