Branch Coverage

blib/lib/Monitoring/TT/Input/Nagios.pm
Criterion Covered Total %
branch 17 32 53.1


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 ? :