| line |
true |
false |
branch |
|
22
|
1 |
2 |
defined $_[0] ? : |
|
63
|
0 |
1 |
unless eval {
do {
store({}, $self->{'Config'}{'data_file'})
}
} |
|
69
|
0 |
1 |
if (defined ${$pkg_tmpl;}) { } |
|
86
|
2 |
5 |
scalar grep(($_ eq $field), @{$$self{'Config'}{'_exclude_fields'};}) ? : |
|
101
|
0 |
1 |
unless open my $fh, "<", $self->{'Config'}{'input_file'} |
|
107
|
0 |
1 |
unless ($output =~ /$valid_format/) |
|
121
|
5 |
2 |
!$self->{'excluded'}{$_} ? : |
|
128
|
6 |
138 |
if ($line =~ /^ \s+? (\d+?)\:/gx) |
|
132
|
144 |
0 |
if ($line =~ /\G \s+? (\w+)/gx) |
|
136
|
144 |
0 |
if ($line =~ /\G \s+ (.*) $/x) |
|
148
|
0 |
1 |
unless eval {
do {
$self->{'stored'} = retrieve($self->{'Config'}{'data_file'})
}
} |
|
161
|
285 |
3 |
unless $self->{$type}{$uid}{$res}[$i]{$_[0]} |
|
170
|
2 |
142 |
if (&$has_changed($uid, $res, $index)) |
|
183
|
2 |
0 |
if ($self->{'Config'}{'_tests'}) { } |
|
190
|
0 |
0 |
if ($self->{'Config'}{'verbose'}) |
|
200
|
0 |
1 |
unless eval {
do {
store($self->{'data'}, $self->{'Config'}{'data_file'})
}
} |
|
242
|
2 |
8 |
if ($mapping[0][1]{$field} != $mapping[1][1]{$field}) |
|
253
|
14 |
14 |
unless ($report =~ /\Q$var\E$/m) |
|
261
|
2 |
12 |
$changed{$pos} ? : |
|
286
|
0 |
0 |
unless sendmail(%mail) |