Branch Coverage

blib/lib/Net/BGP/NLRI.pm
Criterion Covered Total %
branch 64 94 68.0


line true false branch
83 3 7 if ($arg =~ /aspath/i) { }
1 6 elsif ($arg =~ /origin/i) { }
1 5 elsif ($arg =~ /nexthop/i) { }
1 4 elsif ($arg =~ /med/i) { }
1 3 elsif ($arg =~ /localpref/i) { }
1 2 elsif ($arg =~ /atomicaggregate/i) { }
1 1 elsif ($arg =~ /aggregator/i) { }
1 0 elsif ($arg =~ /communities/i) { }
84 0 3 ref $value eq 'Net::BGP::ASPath' ? :
119 7 2 unless ref $proto
133 9 0 defined $$proto{'_as_path'} ? :
144 1 3 @_ ? :
152 0 2 ref $_[0] eq 'Net::BGP::ASPath' ? :
2 16 @_ ? :
160 1 2 @_ ? :
168 1 4 @_ ? :
176 1 2 @_ ? :
184 1 2 @_ ? :
192 1 2 @_ ? :
200 0 0 @_ ? :
207 0 0 defined $_ ? :
0 0 defined $this->as_path ? :
0 0 defined $this->origin ? :
221 0 6 unless defined $other
222 0 6 unless $other->isa('Net::BGP::NLRI')
229 3 50 unless $this->_same_field($other, $key)
240 0 53 if defined $x != defined $y
241 0 53 if ref $x ne ref $y
242 14 39 unless defined $x
243 12 27 if (not ref $x or ref $x eq 'Net::BGP::ASPath') { }
27 0 elsif (ref $x eq 'ARRAY') { }
246 1 11 unless $x eq $y
250 2 25 unless scalar @{$x;} == scalar @{$y;}
255 0 41 unless $x[$i] eq $y[$i]
268 0 1 unless defined $other
269 1 0 $this->_compare($other) == 0 ? :
275 0 1 unless defined $other
276 0 1 $this->_compare($other) == 0 ? :
282 1 0 $this->_compare($other) == -1 ? :
288 1 0 $this->_compare($other) == 1 ? :
294 10 0 defined $$this{$field} ? :
302 0 4 unless defined $other
303 0 4 unless $other->isa('Net::BGP::NLRI')
315 3 1 unless $res == 0
322 0 1 unless $res == 0
327 0 1 unless $res == 0
331 0 1 unless $res == 0