| line |
true |
false |
branch |
|
52
|
31 |
0 |
if ($args_hash{'source'} or $args_hash{'destination'}) { } |
|
61
|
0 |
31 |
if ($config{'input_files'} eq '-') |
|
62
|
0 |
0 |
unless $config{'input_stream'} and $config{'output_stream'} |
|
68
|
0 |
84 |
if ($config{'output_type'} eq 'file') { } |
|
70
|
0 |
0 |
unless open IF, "<$file" |
|
87
|
0 |
84 |
if ($config{'output_type'} eq 'file') { } |
|
88
|
0 |
0 |
unless open OF, ">$file.tdy" |
|
119
|
0 |
0 |
if defined $opt{'h'} or @ARGV < 1 |
|
121
|
0 |
0 |
if (defined $opt{'c'}) |
|
123
|
0 |
0 |
unless (grep {-x "$_/puppet";} split(/:/, $ENV{'PATH'}, 0)) |
|
134
|
0 |
0 |
if (defined $mode and $mode & 4) { } |
|
148
|
0 |
0 |
unless open PP, "puppet parser validate $file |" |
|
181
|
0 |
84 |
if $line eq "\n" or $line =~ /^#/ |
|
199
|
10 |
74 |
if ($line =~ /([^a-z][a-zA-Z]+)\[.*\]/) |
|
201
|
5 |
5 |
unless $line =~ /$type\[\"/ |
|
215
|
5 |
79 |
if $line =~ /\s*path/ |
|
216
|
6 |
73 |
if $line =~ /\s*command/ |
|
217
|
6 |
67 |
if $line =~ /\:\:/ |
|
221
|
7 |
60 |
if ($line =~ /\$.*?:(\s*|$)/) |
|
222
|
7 |
0 |
if $line =~ s/(\x27*)(\$\w+)(\x27*)/"$2"/g |
|
223
|
0 |
0 |
if $line =~ s/(\$\w+)/"$1"/g |
|
239
|
19 |
65 |
if $line =~ /\$/ |
|
248
|
76 |
8 |
unless $line =~ /=\> "/ |
|
249
|
0 |
8 |
if $line =~ /\$/ |
|
259
|
84 |
0 |
unless $line =~ /=\> '/ and $line =~ /\$/ |
|
262
|
0 |
0 |
if $attr eq 'mode' |
|
275
|
19 |
65 |
if $line =~ /\$/ |
|
302
|
74 |
10 |
unless $line =~ /(\x27|\x22)(false|true)(\x27|\x22)/ |
|
304
|
3 |
7 |
if ($line =~ /false/) |
|
305
|
0 |
3 |
$] < 5.01 ? : |
|
309
|
7 |
3 |
if ($line =~ /true/) |