| line |
true |
false |
branch |
|
41
|
0 |
664 |
if ref($value) =~ /^Net::BGP::ASPath::AS_/ |
|
45
|
8 |
656 |
unless defined $value |
|
47
|
0 |
664 |
if (ref $value eq 'HASH') |
|
50
|
0 |
0 |
unless $class =~ /_SET$/ |
|
57
|
301 |
363 |
if (ref $value eq 'ARRAY') |
|
60
|
208 |
93 |
if ($class =~ /_SEQUENCE$/) { } |
|
70
|
0 |
363 |
if ref $value |
|
77
|
134 |
229 |
if ($value =~ /^\((.*)\)$/ or $value eq '' and $class =~ /_CONFED_/) |
|
80
|
130 |
4 |
if defined $1 |
|
83
|
102 |
261 |
if ($value =~ /^\{([0-9,]*)\}$/ or $value eq '' and $class =~ /_SET$/) { } |
|
|
261 |
0 |
elsif ($value =~ /^[0-9 ]*$/) { } |
|
86
|
94 |
8 |
defined $1 ? : |
|
97
|
0 |
363 |
if not $class =~ /::AS$/ and $class ne $realclass |
|
110
|
0 |
44 |
unless (defined $args) |
|
113
|
9 |
35 |
$args->{'as4'} ? : |
|
117
|
0 |
44 |
if ($len * $size + 2 > length $buffer) |
|
125
|
9 |
35 |
if ($args->{'as4'}) { } |
|
132
|
10 |
34 |
if (length $buffer > 2 + $size * $len) { } |
|
149
|
0 |
35 |
unless (defined $args) |
|
157
|
29 |
6 |
if (not $args->{'as4'}) { } |
|
160
|
367 |
4 |
$as <= 65535 ? : |
|
173
|
10 |
23 |
if (ref($this) =~ /_CONFED_/) |
|
180
|
6 |
336 |
if ($as > 65535) |
|
188
|
0 |
0 |
unless defined $other |
|
195
|
0 |
253 |
unless ref $proto |
|
198
|
81 |
172 |
if ($class =~ /_SET$/) { } |
|
212
|
0 |
8 |
if ref $this eq 'Net::BGP::ASPath::AS' |
|
219
|
0 |
0 |
if ref $this eq 'Net::BGP::ASPath::AS' |