| line |
true |
false |
branch |
|
136
|
0 |
0 |
if defined $^S |
|
147
|
0 |
0 |
if (defined $eval) { } |
|
|
0 |
0 |
elsif ($sub eq '(eval)') { } |
|
149
|
0 |
0 |
if ($require) { } |
|
155
|
0 |
0 |
if ($MAXEVALLEN and length $eval > $MAXEVALLEN) |
|
190
|
3 |
5 |
if (ref $self) { } |
|
193
|
1 |
4 |
unless (ref $Singleton) |
|
195
|
1 |
0 |
if (ref($Singleton = 'Config::Manager::Report'->new(@_))) |
|
211
|
1 |
1 |
unless ref $self and keys %{$self;} |
|
215
|
1 |
3 |
if (defined($count = ${${$self;}{'stat'};}[$item]) and $count > 0) |
|
218
|
0 |
1 |
if ($count == 1) { } |
|
222
|
1 |
0 |
if (($count = scalar @{${$self;}{'hold'};}) > 0) |
|
225
|
0 |
1 |
if ($count == 1) { } |
|
232
|
1 |
0 |
if (${$self;}{'flag'}) |
|
238
|
1 |
0 |
if ${$self;}{'singleton'} |
|
242
|
0 |
1 |
unless (CORE::close $handle) |
|
244
|
0 |
0 |
if ($close) { } |
|
276
|
0 |
0 |
if @_ |
|
283
|
2 |
0 |
defined $_[0] ? : |
|
286
|
0 |
2 |
if ($dir =~ s/^([a-zA-Z]:)//) { } |
|
|
2 |
0 |
elsif (not $dir =~ m(^[/\\])) { } |
|
297
|
1 |
1 |
wantarray ? : |
|
306
|
1 |
0 |
if -d "$drv/$dir" |
|
312
|
0 |
0 |
unless (-d $dir) |
|
314
|
0 |
0 |
unless (mkdir $dir, 511) |
|
344
|
1 |
0 |
if ($tool =~ /^\s*$/) |
|
350
|
1 |
0 |
if ($path =~ /^\s*$/) |
|
352
|
0 |
1 |
unless (defined($path = 'Config::Manager::Conf'->get(@LOGFILEPATH))) |
|
361
|
1 |
0 |
if ($file =~ /^\s*$/) |
|
368
|
0 |
1 |
if ($err = MakeDir($path)) |
|
375
|
0 |
1 |
unless (open $handle, ">$file") |
|
395
|
0 |
1 |
if (not $user =~ /^\s*$/ || $name =~ /^\s*$/) { } |
|
401
|
1 |
0 |
if ($user =~ /^\s*$/) |
|
403
|
0 |
1 |
if ($name =~ /^\s*$/) { } |
|
426
|
0 |
0 |
unless ref $self and keys %{$self;} |
|
438
|
0 |
5 |
unless ref $self and keys %{$self;} |
|
439
|
0 |
5 |
if ($command & $Config::Manager::Report::FROM_HOLD) { } |
|
441
|
0 |
0 |
if $command == $Config::Manager::Report::FROM_HOLD + $Config::Manager::Report::TO_HLD |
|
442
|
0 |
0 |
unless @{${$self;}{'hold'};} > 0 |
|
447
|
0 |
5 |
if $level < ${$self;}{'level'} |
|
450
|
2 |
3 |
if ($level & $Config::Manager::Report::USE_LEADIN) |
|
468
|
0 |
5 |
if ($level & $Config::Manager::Report::STACKTRACE) |
|
485
|
5 |
0 |
if ($command & $Config::Manager::Report::TO_LOG) |
|
490
|
0 |
5 |
unless (print $handle join('', @{$text;}, @trace)) |
|
497
|
0 |
5 |
if ($command & $Config::Manager::Report::TO_ERR) |
|
499
|
0 |
0 |
unless (print STDERR join('', @{$text;})) |
|
504
|
1 |
4 |
if ($command & $Config::Manager::Report::TO_OUT) |
|
506
|
0 |
1 |
unless (print STDOUT join('', @{$text;})) |
|
511
|
2 |
3 |
if ($command & $Config::Manager::Report::TO_HLD) |
|
513
|
2 |
0 |
unless ($command & $Config::Manager::Report::FROM_HOLD) |
|
519
|
0 |
5 |
if ($command & $Config::Manager::Report::FROM_HOLD) { } |
|
521
|
0 |
0 |
unless $command & $Config::Manager::Report::TO_HLD |
|
535
|
0 |
0 |
unless ref $self and keys %{$self;} |
|
537
|
0 |
0 |
if $Config::Manager::Report::LEVEL_TRACE < ${$self;}{'level'} |
|
544
|
0 |
0 |
if ($first) { } |
|
546
|
0 |
0 |
if ($stack[4]) { } |
|
551
|
0 |
0 |
if (defined $item) { } |
|
555
|
0 |
0 |
unless $item =~ /^-?(?:[1-9]\d*|0)(?:\.\d+)?$/ |
|
583
|
0 |
0 |
unless ref $self and keys %{$self;} |
|
585
|
0 |
0 |
if (@_ > 0) |
|
596
|
0 |
1 |
unless ref $self and keys %{$self;} |
|
605
|
0 |
1 |
unless ref $self and keys %{$self;} |
|
607
|
1 |
0 |
if (@_ > 0) |
|
609
|
1 |
0 |
$_[0] ? : |
|
618
|
0 |
0 |
if (defined wantarray and wantarray) { } |
|
620
|
0 |
0 |
unless ref $self and keys %{$self;} |
|
625
|
0 |
0 |
unless ref $self and keys %{$self;} |
|
634
|
0 |
0 |
unless ref $self and keys %{$self;} |