| lib/CPANPLUS/YACSmoke/locallib.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 19 | 79 | 24.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 42 | 0 | 0 | 0 | $_PERL =~ /$_DIR_SPLIT/ and -x $_PERL |
| 81 | 0 | 0 | 0 | not length $cwd and $drive |
| 233 | 3 | 0 | 4 | ref $_ && ref $_ eq 'SCALAR' |
| 492 | 0 | 0 | 0 | ref $value and @$value == 1 |
| 0 | 0 | 0 | ref $value and @$value == 1 and ref $value->[0] | |
| 0 | 0 | 0 | ref $value and @$value == 1 and ref $value->[0] and ref $value->[0] eq 'SCALAR' | |
| 0 | 0 | 0 | ref $value and @$value == 1 and ref $value->[0] and ref $value->[0] eq 'SCALAR' and ${$value->[0];} eq $name | |
| 668 | 0 | 0 | 0 | not length $user and defined $ENV{'HOME'} |
| 709 | 1 | 1 | 0 | not $opts->{'quiet'} and @dirs |
| 732 | 0 | 0 | 0 | defined $ENV{'SHELL'} && length $ENV{'SHELL'} |
| 0 | 0 | 0 | $^O eq 'MSWin32' && exists $ENV{'!EXITCODE'} | |
| 0 | 0 | 0 | $^O eq 'MSWin32' && $ENV{'PROMPT'} && $ENV{'COMSPEC'} | |
| 0 | 0 | 0 | $^O eq 'MSWin32' && !$ENV{'PROMPT'} |
| line | l | !l | condition |
|---|---|---|---|
| 222 | 0 | 1 | $_[0]{'inc'} ||= \@INC |
| 223 | 1 | 1 | $_[0]{'libs'} ||= [\'PERL5LIB'] |
| 224 | 1 | 1 | $_[0]{'bins'} ||= [\'PATH'] |
| 225 | 2 | 1 | $_[0]{'roots'} ||= [\'PERL_LOCAL_LIB_ROOT'] |
| 226 | 1 | 0 | $_[0]{'extra'} ||= {} |
| 364 | 0 | 1 | $opts ||= {} |
| 577 | 0 | 0 | $out || " \n" |
| 694 | 2 | 0 | $opts ||= {} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 17 | 0 | 0 | 1 | $^O eq 'MSWin32' || $^O eq 'NetWare' || $^O eq 'symbian' |
| 20 | 0 | 1 | 0 | $^O eq 'MacOS' || $^O eq 'VMS' || $INC{'File/Spec.pm'} |
| 123 | 0 | 0 | 0 | $_DEVNULL ||= (require File::Spec, 'File::Spec'->devnull) |
| 379 | 0 | 1 | 0 | $opts->{'always'} or not @active_lls |
| 1 | 0 | 0 | $opts->{'always'} or not @active_lls or $active_lls[0] ne $path | |
| 395 | 0 | 0 | 0 | Win32::GetShortPathName($path) || $path |
| 471 | 0 | 0 | 0 | $shelltype ||= $self->guess_shelltype |
| 716 | 6 | 0 | 0 | mkdir $dir or -d $dir |