Condition Coverage

blib/lib/HTTP/Message.pm
Criterion Covered Total %
condition 73 82 89.0


and 3 conditions

line !l l&&!r l&&r condition
68 13 18 5 @hdr and $str =~ s/^([ \t].*)\n?//
147 4 97 3 not ref $_[1] and ref $self->{'_content'} eq "SCALAR"
321 16 12 2 not $content_ref_iscopy and keys %limiter_options
438 11 0 3 $$content_ref =~ /[^\x00-\x7F]/ and defined &utf8::upgrade
457 1 0 2 $alt_charset and $charset ne $alt_charset
602 47 17 9 @_ == 1 && length $content && !($content =~ /\n\z/)
619 1 12 1 $maxlen and length $content > $maxlen * "1.1" + 3
669 8 18 1 defined wantarray and !exists $self->{'_parts'} || ref $self->{'_content'} eq 'SCALAR'

or 2 conditions

line l !l condition
371 4 24 $limiter_options{'LimitOutput'} || 0
431 24 0 $opt{'charset'} || $self->content_type_charset || $opt{'default_charset'} || $self->content_charset || 'ISO-8859-1'
456 2 1 $opt{'alt_charset'} || ''
675 5 3 $self->content_type || ''
693 3 1 $self->content_type || ''
804 9 5 $self->{'_parts'} ||= []
811 10 0 $self->{'_headers'}->header('Content-Type') || 'multipart/mixed'
867 1 6 shift() || (return 'xYzZY')

or 3 conditions

line l !l&&r !l&&!r condition
317 2 2 101 $ce eq "identity" or $ce eq "none"
318 24 6 71 $ce eq "gzip" or $ce eq "x-gzip"
6 22 31 $ce eq "x-bzip2" or $ce eq "bzip2"
1 1 23 $ce eq "compress" or $ce eq "x-compress"
336 0 28 0 $res == Compress::Raw::Zlib::Z_OK() or $res == Compress::Raw::Zlib::Z_STREAM_END()
379 0 26 2 $res == Compress::Raw::Bzip2::BZ_OK() or $res == Compress::Raw::Bzip2::BZ_STREAM_END()
426 69 29 9 $self->content_is_text or my $is_xml = $self->content_is_xml
434 11 3 27 $charset eq "us-ascii" or $charset eq "iso-8859-1"
542 1 1 10 $encoding eq "identity" or $encoding eq "none"
1 1 6 $encoding eq "gzip" or $encoding eq "x-gzip"
1 1 3 $encoding eq "x-bzip2" or $encoding eq "bzip2"
669 12 1 6 !exists $self->{'_parts'} || ref $self->{'_content'} eq 'SCALAR'
693 1 0 1 not exists $self->{'_parts'} or ref $self->{'_content'} eq "SCALAR"
700 1 0 1 $p->headers->header_field_names or $p->content ne ""