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 {
|
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)) { }
|