Condition Coverage

lib/App/MtAws/GlacierRequest.pm
Criterion Covered Total %
condition 27 47 57.4


and 2 conditions

line l !l condition
47 86 44 0 defined $options->{$_} and $self->{$_} = $options->{$_}

and 3 conditions

line !l l&&!r l&&r condition
288 0 0 0 $resp and $resp->code == 206
303 0 0 0 defined $start and defined $end
0 0 0 defined $start and defined $end and $len
492 62 0 0 $self->{'content_file'} and $self->{'writer'}
500 0 0 6 $_[1] and $_[1]->isa('HTTP::Response')
502 2 2 1 $self->{'expected_size'} and $size != $self->{'expected_size'}
521 56 3 3 $resp->code eq '500' and $resp->header('Client-Warning')
59 0 3 $resp->code eq '500' and $resp->header('Client-Warning') and $resp->header('Client-Warning') eq 'Internal response'
48 3 2 defined $resp->header('X-Died') and get_exception($resp->header('X-Died'))
48 0 3 defined $resp->header('X-Died') and length $resp->header('X-Died')
536 15 1 4 defined $resp->content_length and $resp->content_length != length $resp->content
556 2 0 5 $resp->content_type and $resp->content_type eq 'application/json'

or 2 conditions

line l !l condition
46 334 4 0 defined($self->{$_} = $options->{$_}) or confess($_)
50 0 64 $self->{'service'} ||= 'glacier'

or 3 conditions

line l !l&&r !l&&!r condition
502 1 0 5 not $size or $self->{'expected_size'} and $size != $self->{'expected_size'}