Branch Coverage

blib/lib/App/Modular.pm
Criterion Covered Total %
branch 30 84 35.7


line true false branch
80 0 234 if ($level < $$self{'debuglevel'})
81 0 0 if (not $$self{'debugtrace'}) { }
94 2 0 if (defined $level)
105 0 0 if defined $trace
121 0 18 unless ($module)
129 0 18 if ($self->module_isloaded($module))
136 18 0 if (not $module =~ m[/]) { }
137 0 18 unless ($$self{'module_dir'})
141 0 18 unless (-d $$self{'module_dir'})
146 0 18 unless (defined $$self{'module_ext'})
168 18 0 if (-r $modfile) { }
173 0 18 if (not $instance) { }
188 0 0 if ($@ or not $instance)
189 0 0 unless ($instance)
191 0 0 $err ? :
0 0 $@ ? :
212 4 14 if ($dep)
216 4 0 unless ($self->module_isloaded($dep))
228 0 78 unless ($module)
233 44 34 $$self{'modules'}{$module} ? :
257 2 0 unless $pattern
283 0 0 unless ($self->module_autoload)
290 0 0 unless $mdir
291 0 0 unless $mext
292 0 0 unless $mdir =~ m[/$]
294 0 0 unless (opendir $dirhandle, $mdir)
302 0 0 if $file =~ /^\./
303 0 0 if (-f $mdir . $file and -r $mdir . $file) { }
0 0 elsif ($recursive and -d $mdir . $file) { }
304 0 0 if (length($file) - length($mext) == rindex($file, $mext))
316 0 0 unless closedir $dirhandle
319 0 0 unless ($internal)
336 4 4 if defined $value
337 0 8 unless ($$self{'module_dir'} and $$self{'module_ext'})
349 4 4 if ($moduledir) { }
350 0 4 unless $moduledir =~ m[/$]
362 4 4 if ($moduleext) { }
374 34 10 if ($self->module_isloaded($module_name)) { }
381 10 0 if ($$self{'autoload'}) { }
382 0 10 if ($noautoload) { }
389 10 0 if ($self->module_isloaded($module_name)) { }
414 0 0 if ($#loaded_modules > 0) { }