Branch Coverage

lib/CPANPLUS/Configure.pm
Criterion Covered Total %
branch 38 64 59.4


line true false branch
32 15 2849 if @_
92 0 15 unless check($tmpl, \%hash)
102 15 0 if $load
132 14 1 unless ($loaded++)
160 0 1 if &Module::Loaded::is_loaded($plugin)
165 0 1 if ($@)
171 1 0 if $sub
195 0 2 unless -e $file
219 0 1 unless my $pm = shift @_
225 1 0 if ($pm eq 'CPANPLUS::Config::User') { }
0 0 elsif ($pm eq 'CPANPLUS::Config::System') { }
234 0 0 unless ($pm =~ /^$cfg_pkg/)
257 0 1 unless my $file = $self->_config_pm_to_file($pm, $savedir)
260 0 1 unless (-d $dir)
261 0 0 unless $self->_mkdir('dir', $dir)
266 0 1 unless $self->can_save($file)
337 1 0 if -f $file
340 0 1 unless $fh->open(">$file")
371 0 6 unless check($tmpl, \%hash)
374 6 0 if $_->can($type)
453 695 2086 if $private
454 2780 1 if $field
456 1 2780 unless ($conf->can($type))
461 0 2780 unless (scalar @_)
467 2525 255 if ($action eq 'get') { }
249 6 elsif ($action eq 'set') { }
6 0 elsif ($action eq 'add') { }
472 2524 1 if ($conf->can($type) and $conf->$type->can($key)) { }
1 0 elsif ($type eq '_build' and $key eq 'base') { }
486 1480 1044 wantarray ? :
495 249 0 if ($conf->can($type) and $conf->$type->can($key)) { }
512 0 6 if ($conf->$type->can($key)) { }