Branch Coverage

lib/App/MtAws/ConfigDefinition.pm
Criterion Covered Total %
branch 61 74 82.4


line true false branch
42 85 346 if (&first(sub { &present(); } , @l)) { }
45 80 65 if ($_->{'name'} eq 'filter') { }
30 35 elsif ($_->{'name'} eq 'include') { }
35 0 elsif ($_->{'name'} eq 'exclude') { }
47 15 65 if defined $F->{'error'}
65 0 123 if (&present('base-dir') and not &present('dir')) { }
58 65 elsif (&present('dir')) { }
81 1 54 unless (&present(&optional('check-max-file-size')))
92 66 57 if (&present('filename')) { }
56 1 elsif (&present('stdin')) { }
94 9 57 if (&present('set-rel-filename')) { }
56 1 elsif (&present('dir')) { }
95 1 8 if (&present('dir')) { }
103 49 7 if (&valid('dir') and &valid('filename')) { }
108 0 49 if (not defined $b_dir) { }
0 49 elsif (not defined $b_file) { }
122 0 49 unless &file_inodev(scalar &value('filename')) eq &file_inodev($dir . '/' . $relfilename)
125 4 45 if (not is_relative_filename($relfilename)) { }
143 55 1 if (&present('set-rel-filename')) { }
144 1 54 if (&present('dir')) { }
170 0 0 if (&present('wait')) { }
180 1 204 if (defined $journal and &present($journal) and not exists $App::MtAws::ConfigEngine::context->{'override_validations'}{'journal'})
181 1 0 unless -f &binaryfilename(scalar &value($journal))
189 455 8 if (defined $journal and &present($journal))
191 0 0 if -e $value and !(-w $value) || -d $value
199 9 0 if (defined $journal and &present($journal))
200 0 9 if -s &binaryfilename(scalar &value($journal))
207 20 583 if (&present('protocol') and &value('protocol') eq 'https')
208 15 5 if ('LWP::UserAgent'->is_protocol_supported('https')) { }
210 5 10 unless 'LWP'->VERSION ge '6'
212 5 10 unless 'LWP::Protocol::https'->VERSION and 'LWP::Protocol::https'->VERSION ge '6'
222 54 69 if (&present('check-max-file-size')) { }
223 24 30 if (&value('check-max-file-size') > 10000 * &value('partsize')) { }
240 21 205 &explicit('detect') && !&present('replace-modified') ? :
250 85 141 if (&present('new') or &present('replace-modified') or &present('delete-removed')) { }
345 522 0 if $_ >= 1
357 348 1 if $_ != 0