| line |
true |
false |
branch |
|
39
|
0 |
0 |
if ($arg =~ /name/i) { } |
|
|
0 |
0 |
elsif ($arg =~ /policy/i) { } |
|
43
|
0 |
0 |
unless $value->isa('Net::BGP::Policy') |
|
61
|
0 |
0 |
if ($dir =~ /(out|both)/i) |
|
64
|
0 |
0 |
if defined $$this{'_policy'} |
|
77
|
0 |
0 |
if ($dir =~ /(in|both)/i) |
|
80
|
0 |
0 |
if defined $$this{'_policy'} |
|
102
|
0 |
0 |
if ($dir =~ /(out|both)/i) |
|
108
|
0 |
0 |
if defined $$this{'_policy'} |
|
117
|
0 |
0 |
if ($dir =~ /(in|both)/i) |
|
124
|
0 |
0 |
if defined $$this{'_policy'} |
|
137
|
0 |
0 |
if (not defined $policy or $policy->isa('Net::ACL')) { } |
|
|
0 |
0 |
elsif ($policy->isa('Net::BGP::Policy')) { } |
|
139
|
0 |
0 |
unless defined $peer and defined $dir |
|
141
|
0 |
0 |
unless defined $$this{'_policy'} |
|
146
|
0 |
0 |
if defined $peer or defined $dir |
|
161
|
0 |
0 |
unless defined $peer |
|
166
|
0 |
0 |
unless defined $peer |