line |
true |
false |
branch |
87
|
3 |
0 |
if ($self->{'montt'}) { } |
89
|
0 |
3 |
unless $self->{'montt'}->tt->process(\$template, {}, \$output) |
91
|
0 |
0 |
unless open my $fh, '<', $file |
100
|
0 |
40 |
if substr($line, 0, 1) eq '#' |
101
|
0 |
40 |
if $line =~ /^\s*$/gmx |
103
|
5 |
35 |
if ($line =~ /^\s*define\s+(\w+)($|\s|{)/mx) { } |
|
35 |
0 |
elsif ($in_obj) { } |
105
|
0 |
5 |
if ($type and $in_type . 's' ne $type) |
111
|
5 |
30 |
if ($line =~ /^\s*}/mx) { } |
121
|
5 |
0 |
if $in_type eq 'host' |
127
|
5 |
0 |
if ($in_type eq 'host') |
132
|
0 |
5 |
if ($in_type eq 'contact') |
137
|
0 |
5 |
if ($in_type eq 'service') |
141
|
0 |
5 |
unless $current->{'type'} |
144
|
0 |
5 |
unless $current->{'file'} |
146
|
5 |
0 |
defined $1 ? : |