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)
173 0 0 unless $NoComputeLengths
174 0 0 unless $NoComputeChecksums
182 0 0 if ($last and defined $last->payload)
186 0 0 if $self->[$__padding]
202 0 0 unless defined $last->payload and length $last->payload
212 0 0 if ($l->layer eq 'IPv4') { }
0 0 elsif ($l->layer eq 'IPv6') { }
225 0 0 if $rawLength == $tLen
229 0 0 if ($rawLength > $tLen) { }
240 0 0 if ($payloadLength > $pLen) { }
255 0 0 unless $self->[$__reply]
260 0 0 if ($l->can('match'))
271 0 0 if ($l->can('getKey'))
281 0 0 if ($l->can('getKeyReverse'))
295 0 0 unless $this->[$__timestamp] gt $self->[$__timestamp]
299 0 0 if (exists $this->[$__ref]{'ICMPv4'} and exists $this->[$__ref]{'UDP'} || exists $this->[$__ref]{'TCP'}) { }
0 0 elsif (exists $this->[$__ref]{$layer->layer}) { }
301 0 0 if (exists $this->[$__ref]{$layer->layer})
303 0 0 if $this->[$__ref]{$layer->layer}->getKey eq $layer->getKey
307 0 0 if $layer->match($this->[$__ref]{$layer->layer})
319 0 0 if $self->[$__reply]
322 0 0 unless my $h = $oDump->next
327 0 0 if (my $reply = $self->_recv($oDump))
336 0 0 unless (shift())->[$___getKey]
337 0 0 unless (shift())->[$___getKeyReverse]
351 0 0 if ($last and $last->payload)
356 0 0 if ($self->[$__padding])
373 0 0 if ($last and defined $last->payload)
377 0 0 if $self->[$__padding]