| line |
true |
false |
branch |
|
107
|
315 |
18 |
unless $line =~ /^\s*(description|remark)\s/ |
|
122
|
45 |
252 |
if ($line =~ /^(\s*)\S/ and length $1 < $indent) |
|
128
|
31 |
16 |
if $indent and $indent < $indent_init |
|
185
|
34 |
316 |
if (defined $indent and $line =~ /^($indent|\s*$)/) { } |
|
|
51 |
265 |
elsif ($line =~ /$match_re/) { } |
|
189
|
51 |
0 |
if $line =~ /^(\s*)/ |
|
199
|
14 |
11 |
wantarray ? : |
|
235
|
1 |
8 |
if (not defined $old || defined $new) { } |
|
|
1 |
7 |
elsif (not defined $old) { } |
|
|
1 |
6 |
elsif (not defined $new) { } |
|
|
1 |
5 |
elsif ($old eq $new) { } |
|
259
|
4 |
3 |
if (defined $new[0] and $new[0] eq $line) { } |
|
267
|
1 |
4 |
if defined $new[0] and not defined $diff |
|
268
|
1 |
4 |
unless defined $diff |
|
406
|
12 |
0 |
if (not defined $indent) { } |
|
|
0 |
0 |
elsif (caller ne 'Mnet::Stanza::_ios_find') { } |
|
433
|
0 |
12 |
unless $template_stanzas[0] |
|
439
|
6 |
30 |
if ($template_stanza =~ /^\+/) { } |
|
|
9 |
21 |
elsif ($template_stanza =~ /^\>/) { } |
|
|
2 |
19 |
elsif ($template_stanza =~ /^\=/) { } |
|
|
19 |
0 |
elsif ($template_stanza =~ /^\-/) { } |
|
484
|
0 |
6 |
unless $template =~ /^\+(\S.*)$/ |
|
488
|
4 |
2 |
unless $config =~ /^$indent\Q$add_line\E$/m |
|
514
|
0 |
9 |
unless $template =~ /^\>(\S.*)$/m |
|
520
|
10 |
9 |
if defined $find_subcommands |
|
521
|
9 |
10 |
unless defined $find_subcommands |
|
525
|
7 |
2 |
if ($find_subcommands =~ /\S/) |
|
529
|
7 |
0 |
if $template =~ /\n(\s*)/ |
|
537
|
13 |
6 |
if defined $config_subcommands |
|
538
|
6 |
13 |
unless defined $config_subcommands |
|
548
|
6 |
1 |
if ($output_subcommands =~ /\S/) |
|
582
|
0 |
2 |
unless $template =~ /^\=(\S.*)$/m |
|
588
|
0 |
5 |
unless $line =~ /^(\s*)=(\S.*)$/ |
|
596
|
1 |
1 |
if $config_stanza ne $match_stanza |
|
622
|
0 |
19 |
unless $template =~ /^\-(\S.*)$/ |
|
627
|
6 |
13 |
if $remove_line =~ /^(.*)\*\!\*$/ |
|
636
|
15 |
520 |
if ($config_line =~ /^$indent(\Q$regex_line\E$regex_wildcard)$/m) |
|
638
|
7 |
8 |
unless ($$checked{$indent . $match_line}) |