Condition Coverage

blib/lib/Template/Direct/Directory.pm
Criterion Covered Total %
condition 6 29 20.6


and 2 conditions

line l !l condition
53 0 0 carp(q[Directory Error: 'Directory' is a required field]) and return
61 0 0 carp('Directory Error: files are not allowed as Directories (please use Directory::File)') and return
83 0 0 carp('Directory Error: file is a required field when saving') and return
84 0 0 carp('Directory Error: Directories can not be saved') and return
170 0 0 carp('Unable to clean path because Diretory object is involid') and return
380 0 0 carp("file Error: Filename is a required field\n") and return
427 0 0 push @results, $dir and next

and 3 conditions

line !l l&&!r l&&r condition
166 4 2 0 $p{'File'} && !$p{'Directory'}
185 4 2 0 $1 and $ENV{'DIR_DEBUG'}
315 0 0 0 $dir and not -d $path . $dir
426 0 0 0 $dir ne '.' and $dir ne '..'

or 3 conditions

line l !l&&r !l&&!r condition
176 0 2 4 $p{'CreateFile'} or -f $path