line |
true |
false |
branch |
32
|
55 |
3914 |
if @_ |
99
|
0 |
17 |
unless check($tmpl, \%hash) |
109
|
2 |
15 |
if $load |
152
|
0 |
4 |
unless check($tmpl, \%hash) |
164
|
1 |
3 |
if ($ENV{$env} and not $warned) |
178
|
3 |
1 |
if (not $loaded++ or $rescan) |
206
|
3 |
3 |
if (my $loc = &Module::Loaded::is_loaded($plugin)) { } |
212
|
3 |
0 |
if (eval {
do {
&load($plugin);
1
}
}) { } |
220
|
0 |
3 |
if ($@) |
226
|
3 |
0 |
if $sub |
232
|
0 |
4 |
if ($cur_base ne $self->get_conf('base')) |
246
|
0 |
0 |
unless $inc{$l} |
269
|
1 |
0 |
unless -e $file |
294
|
0 |
1 |
unless my $pm = shift() |
300
|
0 |
1 |
if ($pm eq 'CPANPLUS::Config::User') { } |
|
0 |
1 |
elsif ($pm eq 'CPANPLUS::Config::System') { } |
309
|
0 |
1 |
unless ($pm =~ /^$cfg_pkg/) |
332
|
0 |
1 |
unless my $file = $self->_config_pm_to_file($pm, $savedir) |
335
|
1 |
0 |
unless (-d $dir) |
336
|
0 |
1 |
unless $self->_mkdir('dir', $dir) |
341
|
0 |
1 |
unless $self->can_save($file) |
412
|
0 |
1 |
if -f $file |
415
|
0 |
1 |
unless $fh->open(">$file") |
446
|
0 |
6 |
unless check($tmpl, \%hash) |
450
|
6 |
0 |
if $_->can($type) |
522
|
680 |
3161 |
if $private |
523
|
3840 |
1 |
if $field |
526
|
1 |
3840 |
unless ($type_code) |
532
|
0 |
3840 |
unless (scalar @_) |
538
|
3500 |
340 |
if ($action eq 'get') { } |
|
334 |
6 |
elsif ($action eq 'set') { } |
|
6 |
0 |
elsif ($action eq 'add') { } |
543
|
3499 |
1 |
if (my $code = $type_obj->can($key)) { } |
|
1 |
0 |
elsif ($type eq '_build' and $key eq 'base') { } |
557
|
1953 |
1546 |
wantarray ? : |
566
|
334 |
0 |
if (my $code = $type_obj->can($key)) { } |
583
|
0 |
6 |
if ($type_obj->can($key)) { } |