line |
true |
false |
branch |
111
|
0 |
0 |
unless $Options{'configDir'} |
113
|
0 |
0 |
unless $Options{'globalConfigFile'} or $Options{'noConfig'} |
116
|
0 |
0 |
unless ($Options{'noValidation'}) |
117
|
0 |
0 |
if ($Options{'validation'}) { } |
120
|
0 |
0 |
unless constructValidation() |
123
|
0 |
0 |
unless ($Options{'noConfig'}) |
124
|
0 |
0 |
unless -d $Options{'configDir'} |
125
|
0 |
0 |
unless -e "$Options{'configDir'}/$Options{'configFile'}" |
131
|
0 |
0 |
unless ($Options{'noValidation'}) |
132
|
0 |
0 |
unless validateConfig(%global) |
137
|
0 |
0 |
unless ($Options{'noValidation'}) |
138
|
0 |
0 |
unless validateConfig(%specific) |
145
|
0 |
0 |
unless ($Options{'noCommandLine'}) |
147
|
0 |
0 |
unless ($Options{'noValidation'}) |
148
|
0 |
0 |
unless validateConfig(%specific) |
152
|
0 |
0 |
if ($Options{'debug'}) |
159
|
0 |
0 |
if (exists $global{$key} and $Options{'debug'}) |
167
|
0 |
0 |
if ($global{$key} and $Options{'debug'}) |
181
|
0 |
0 |
unless open IN, $target |
185
|
0 |
0 |
if $line eq '' |
189
|
0 |
0 |
if (not $Options{'noValidation'} and $configValidation{$command}{'type'} eq 'alias') { } |
192
|
0 |
0 |
if ($hash{$command} and $hash{$command} ne $opt) |
198
|
0 |
0 |
if $Options{'debug'} |
208
|
0 |
0 |
unless $target = $Options{'validationFile'} |
210
|
0 |
0 |
unless -e "$dir/$target" |
214
|
0 |
0 |
if (open IN, "$dir/$target") { } |
223
|
0 |
0 |
if $line eq '' |
225
|
0 |
0 |
if (my($option, $format, $arg) = $line =~ /^(\w+)\s+(string|int|alias|fqdn|bool|regexp)\s*(.*)/i) { } |
264
|
0 |
0 |
if ($configValidation{$option}{'type'} eq 'regexp') |
265
|
0 |
0 |
if ($configValidation{$option}{'arg'} =~ /^RE::(.*)\s*/) { } |
270
|
0 |
0 |
if (defined $$regexp{$REid}) { } |
278
|
0 |
0 |
unless (eval {
do {
qr/$configValidation{$option}{'arg'}/
}
}) |
294
|
0 |
0 |
if ($configValidation{$key}) { } |
296
|
0 |
0 |
if ($configValidation{$key}{'type'} eq 'alias') |
302
|
0 |
0 |
if ($configValidation{$key}{'type'} eq 'bool') |
308
|
0 |
0 |
if ($configValidation{$key}{'type'} eq 'int') |
309
|
0 |
0 |
unless ($hash{$key} =~ /$Config::Cascade::RE{'num'}{'int'}/) |
317
|
0 |
0 |
if ($configValidation{$key}{'type'} eq 'string') |
318
|
0 |
0 |
unless ($hash{$key} =~ /\w+/) |
326
|
0 |
0 |
if ($configValidation{$key}{'type'} eq 'fqdn') |
327
|
0 |
0 |
unless ($hash{$key} =~ /$Config::Cascade::RE{'net'}{'domain'}/) |
335
|
0 |
0 |
if ($configValidation{$key}{'type'} eq 'regexp') |
336
|
0 |
0 |
unless ($hash{$key} =~ /$configValidation{$key}{'args'}/) |
362
|
0 |
0 |
if ($arg =~ /^--(\w+)=(.*)/) { } |
|
0 |
0 |
elsif ($arg =~ /^-(\w)=(.*)/) { } |