Branch Coverage

blib/lib/WARC/Record/Replay/HTTP/Message.pm
Criterion Covered Total %
branch 20 22 90.9


line true false branch
32 25 49 if ($handle)
39 75 30 if (/^($WARC::Record::Replay::HTTP::HTTP__token):\s+(.*)/o) { }
5 25 elsif (/^(\s+\S.*)$/) { }
25 0 elsif (/^$/) { }
55 14 11 if ($record->field('Content-Length') == $data_offset) { }
3 8 elsif ($record->field('Content-Length') - $data_offset < $WARC::Record::Replay::HTTP::Content_Deferred_Loading_Threshold) { }
70 64 10 if scalar grep($ob->{'_warc_defer'}{$_}, keys %{$$ob{'_warc_defer'};})
81 1 5 unless $self->{'_warc_record'}->field('Content-Length') - $self->{'_warc_data_offset'} < $WARC::Record::Replay::HTTP::Content_Maximum_Length
84 0 5 unless seek $handle, $self->{'_warc_data_offset'}, 0
94 5 13 if $self->{'_warc_defer'}{'content'}
102 1 9 if $self->{'_warc_defer'}{'content'}