Branch Coverage

blib/lib/File/Collector.pm
Criterion Covered Total %
branch 65 88 73.8


line true false branch
15 1 40 unless $AUTOLOAD =~ /.*::(next_|isa_|get_)*(\w+)_files*$/
18 1 39 if (not $s->{'_files'}{"$2_files"}) { }
19 2 37 unless $1
21 23 14 if ($1 eq 'next_')
25 2 12 if ($1 eq 'isa_')
78 1 5 if -f $resource
79 5 1 if -d $resource
107 1 1 unless $file
139 0 23 unless $type
140 0 23 unless $s->{'_files'}{$t}
148 0 23 unless $obj
158 1 120 unless ($prop)
164 120 0 ref $s->selected eq 'HASH' ? :
168 0 120 unless (exists $object->{$attr})
172 0 120 if (ref $value eq 'ARRAY') { }
182 0 23 unless ($obj)
188 0 23 ref $s->selected eq 'HASH' ? :
197 0 23 unless ($val)
206 0 23 unless (exists $object->{$attr})
227 0 23 ref $s->selected eq 'HASH' ? :
229 0 23 unless ($meth)
236 0 23 unless ($obj->can($meth))
250 1 23 unless ($type)
257 0 23 ref $s->selected eq 'HASH' ? :
266 0 23 if (ref $s->selected eq 'HASH') { }
276 0 30 if @_
286 10 43 ref $s->selected eq 'HASH' ? :
292 1 6 if not -e $_[0]
304 0 10 unless opendir my $dh, $dir
310 9 1 if $s->{'_options'}{'recurse'}
312 0 5 unless opendir my $tdh, 'File::Spec'->catdir($dir, $tdir)
322 0 5 if $role->can('_run_processes')
338 1054 18 if (defined $letters[$lc] and $cletters[$lc] eq $letters[$lc])
351 3 2 if (@files) { }
370 23 0 if not $s->{'_files'}{$file}
377 5 0 if $c->can('_init_processors')
380 0 10 if $s->{'_files'}{"${it}_files"}
391 23 0 if $role->can('_classify_file')
400 10 14 if (not ref $arg) { }
4 10 elsif (ref $arg eq 'HASH') { }
9 1 elsif (ref $arg eq 'ARRAY') { }
403 1 3 if %$user_opts
406 1 8 if $classes
412 2 6 unless @resources