Branch Coverage

blib/lib/Net/Frame/Simple.pm
Criterion Covered Total %
branch 0 76 0.0


line true false branch
61 0 0 $self->[$__raw] ? :
87 0 0 if ($encapsulate eq 1)
100 0 0 unless $raw
105 0 0 if ($@)
109 0 0 if ($prevLayer)
114 0 0 unless my $l = $layer->new('raw', $raw)->unpack
124 0 0 unless $encapsulate
126 0 0 if ($encapsulate eq 1)
136 0 0 if (@layers > 0)
176 0 0 unless $NoComputeLengths
177 0 0 unless $NoComputeChecksums
185 0 0 if ($last and defined $last->payload)
189 0 0 if $self->[$__padding]
205 0 0 unless defined $last->payload and length $last->payload
215 0 0 if ($l->layer eq 'IPv4') { }
0 0 elsif ($l->layer eq 'IPv6') { }
228 0 0 if $rawLength == $tLen
232 0 0 if ($rawLength > $tLen) { }
243 0 0 if ($payloadLength > $pLen) { }
258 0 0 unless $self->[$__reply]
263 0 0 if ($l->can('match'))
274 0 0 if ($l->can('getKey'))
284 0 0 if ($l->can('getKeyReverse'))
298 0 0 unless $this->[$__timestamp] gt $self->[$__timestamp]
302 0 0 if (exists $this->[$__ref]{'ICMPv4'} and exists $this->[$__ref]{'UDP'} || exists $this->[$__ref]{'TCP'}) { }
0 0 elsif (exists $this->[$__ref]{$layer->layer}) { }
304 0 0 if (exists $this->[$__ref]{$layer->layer})
306 0 0 if $this->[$__ref]{$layer->layer}->getKey eq $layer->getKey
310 0 0 if $layer->match($this->[$__ref]{$layer->layer})
322 0 0 if $self->[$__reply]
325 0 0 unless my $h = $oDump->next
330 0 0 if (my $reply = $self->_recv($oDump))
339 0 0 unless (shift())->[$___getKey]
340 0 0 unless (shift())->[$___getKeyReverse]
354 0 0 if ($last and $last->payload)
359 0 0 if ($self->[$__padding])
376 0 0 if ($last and defined $last->payload)
380 0 0 if $self->[$__padding]