| line |
true |
false |
branch |
|
13
|
1 |
4 |
unless defined $$arg_ref{'protocol'} |
|
16
|
1 |
3 |
unless $$arg_ref{'protocol'} =~ /^(?:tcp|udp|tcp-udp)$/ |
|
29
|
1 |
4 |
unless defined $$arg_ref{'group_object'} or defined $$arg_ref{'svc'} |
|
32
|
1 |
6 |
if defined $$arg_ref{'group_object'} and defined $$arg_ref{'svc'} |
|
35
|
1 |
5 |
if defined $$arg_ref{'svc'} and not defined $$arg_ref{'svc_op'} |
|
38
|
1 |
4 |
if defined $$arg_ref{'svc_op'} and not $$arg_ref{'svc_op'} =~ /^(?:eq|range)$/ |
|
42
|
1 |
3 |
if defined $$arg_ref{'group_object'} and not UNIVERSAL::isa($$arg_ref{'group_object'}, 'Net::Cisco::ObjectGroup::Service') |
|
47
|
1 |
1 |
if (defined $$arg_ref{'svc'} and defined 'Net::Cisco::ObjectGroup::Service'->__dict and exists 'Net::Cisco::ObjectGroup::Service'->__dict->{$$arg_ref{'svc'}}) |
|
54
|
0 |
1 |
if (defined $$arg_ref{'svc_hi'} and defined 'Net::Cisco::ObjectGroup::Service'->__dict and exists 'Net::Cisco::ObjectGroup::Service'->__dict->{$$arg_ref{'svc_hi'}}) |
|
61
|
1 |
1 |
defined $$arg_ref{'svc_hi'} ? : |
|
|
1 |
2 |
defined $$arg_ref{'group_object'} ? : |
|
67
|
1 |
2 |
if defined $$arg_ref{'group_object'} |