| line |
true |
false |
branch |
|
56
|
0 |
0 |
if $line eq '-1' |
|
68
|
0 |
0 |
exists $parms{'comments'} ? : |
|
69
|
0 |
0 |
exists $parms{'detailed'} ? : |
|
108
|
0 |
0 |
unless ($No_Detail) |
|
110
|
0 |
0 |
$No_Comments ? : |
|
112
|
0 |
0 |
if (exists $children{$child}) |
|
132
|
0 |
0 |
unless $masterMenu |
|
134
|
0 |
0 |
$title{$node} ? : |
|
139
|
0 |
0 |
if $printKids and exists $children{$node} |
|
142
|
0 |
0 |
unless $masterMenu |
|
155
|
0 |
0 |
if ($menuMark =~ /^\@c/) { } |
|
191
|
0 |
0 |
unless open $handle, "<$layers", $filename |
|
196
|
0 |
0 |
if (/^\@node +([^,\n]+)/) { } |
|
|
0 |
0 |
elsif (/^\@menu/ .. /^\@end menu/) { } |
|
|
0 |
0 |
elsif (/^\@c(omment)? DESC: *(.*?) *$/) { } |
|
|
0 |
0 |
elsif (/^ *\@include +(\S+)\s/) { } |
|
|
0 |
0 |
elsif (/^ *\@documentencoding +(\S+)\s/) { } |
|
198
|
0 |
0 |
if defined $prev{$newNode} |
|
200
|
0 |
0 |
if ($newNode eq 'Top') |
|
210
|
0 |
0 |
unless $section =~ /^\@([a-z]+) +(.+)$/ |
|
213
|
0 |
0 |
unless exists $level{$1} |
|
216
|
0 |
0 |
if $newLevel - $level > 1 |
|
220
|
0 |
0 |
unless ($desc{$newNode}) |
|
221
|
0 |
0 |
$newNode ne $section ? : |
|
224
|
0 |
0 |
if ($newLevel < $level) { } |
|
231
|
0 |
0 |
unless $newLevel > $level |
|
242
|
0 |
0 |
unless /^(\@c )?\* / |
|
246
|
0 |
0 |
if (/\* +([^:]+):: *(.*)$/) { } |
|
|
0 |
0 |
elsif (/\* +([^:]+): *([^,.\t\n]+)[,.\t\n] *(.*)$/) { } |
|
256
|
0 |
0 |
if ($desc and $desc{$node}) |
|
257
|
0 |
0 |
if $desc ne $desc{$node} and $Verbose |
|
264
|
0 |
0 |
if $desc |
|
268
|
0 |
0 |
if ($Verbose and $desc{$node} and $desc{$node} ne $2 and $desc{$node} ne $section) |
|
284
|
0 |
0 |
unless defined $wantLayers |
|
286
|
0 |
0 |
if ($layers) { } |
|
|
0 |
0 |
elsif ($wantLayers) { } |
|
287
|
0 |
0 |
if $layers ne $wantLayers |
|
290
|
0 |
0 |
if defined $node |
|
328
|
0 |
0 |
unless rename $filename, "$filename#~" |
|
333
|
0 |
0 |
unless open $inHandle, "<$layers", "$filename#~" |
|
334
|
0 |
0 |
unless open $outHandle, ">$layers", $filename |
|
339
|
0 |
0 |
if (/^ *\@include +(\S+)\s/) { } |
|
|
0 |
0 |
elsif (/^\@menu/) { } |
|
|
0 |
0 |
elsif (/^\@node +([^,\n]+)/) { } |
|
344
|
0 |
0 |
if (ref $menu) |
|
345
|
0 |
0 |
if ($node eq 'Top') { } |
|
352
|
0 |
0 |
if (ref $menu) |
|
353
|
0 |
0 |
if ($node eq 'Top') { } |
|
359
|
0 |
0 |
if exists $children{$node} |
|
363
|
0 |
0 |
if (/^\@menu/ .. /^\@end menu/) { } |
|
366
|
0 |
0 |
unless $deleteBlanks and /^ *$/ |