| line |
true |
false |
branch |
|
62
|
2 |
2 |
if ($caller =~ /^ $self
:: ([a-zA-Z0-9_]+)
(?: :: [a-zA-Z0-9_]+ )* $/ox) |
|
69
|
0 |
1 |
if ($Config::Manager::Base::SCOPE eq $Config::Manager::Base::NONE) |
|
73
|
0 |
1 |
unless (defined 'Config::Manager::Conf'->init($Config::Manager::Base::SCOPE)) |
|
85
|
0 |
1 |
unless (ref($err = 'Config::Manager::Report'->singleton)) |
|
223
|
0 |
0 |
if ($param =~ /^-D ( [a-zA-Z][a-zA-Z0-9_-]* )
( (?: :: [a-zA-Z][a-zA-Z0-9_-]* )? )
= ( .* ) $/x) |
|
230
|
0 |
0 |
if ($var eq '') { } |
|
236
|
0 |
0 |
if (substr($sec, -1) ne '-' and substr($var, -1) ne '-') |
|
238
|
0 |
0 |
unless (defined 'Config::Manager::Conf'->set($sec, $var, $val)) |
|
273
|
0 |
0 |
if ('Config::Manager::Report'->ret_hold > 0) |
|
278
|
0 |
0 |
if (@_ > 0) |
|
283
|
0 |
0 |
if ($fishy) |
|
299
|
0 |
0 |
if (@_ > 0 and ref $_[0] eq 'Config::Manager::Conf') { } |
|
306
|
0 |
0 |
if (ref $item and ref $item eq 'ARRAY' and @{$item;} > 0) { } |
|
308
|
0 |
0 |
if (defined($value = $conf->get(@{$item;}))) { } |
|
343
|
0 |
0 |
if (@list = &GetList(@_)) |