| line |
!l |
l&&!r |
l&&r |
condition |
|
159
|
0 |
0 |
0 |
$arg and $arg =~ /^\D/ |
|
182
|
0 |
0 |
0 |
not $SkipInstall and $CheckOnly || _prompt('==> Auto-install the ' . @required / 2 . ($mandatory ? ' mandatory' : ' optional') . ' module(s) from CPAN?', $default ? 'y' : 'n') =~ /^[Yy]/ |
|
|
0 |
0 |
0 |
not $SkipInstall and $default |
|
|
0 |
0 |
0 |
not $SkipInstall and $default and $mandatory |
|
|
0 |
0 |
0 |
not $SkipInstall and $default and $mandatory and _prompt('==> The module(s) are mandatory! Really skip?', 'n') =~ /^[Nn]/ |
|
218
|
0 |
0 |
0 |
@Missing and not $CheckOnly || $UnderCPAN |
|
260
|
0 |
0 |
0 |
$^O eq 'MSWin32' ? _under_cpan() : == getppid and ($$CPAN::Config{'prerequisites_policy'} || '') ne 'ignore' |
|
304
|
0 |
0 |
0 |
$args{'do_once'} and open FAILED, '.#autoinstall.failed' |
|
325
|
0 |
0 |
0 |
$args{'do_once'} and open FAILED, '>> .#autoinstall.failed' |
|
358
|
0 |
0 |
0 |
not $makeflags =~ /\bUNINST\b/ and eval " $> eq '0' " |
|
380
|
0 |
0 |
0 |
$obj and defined _version_check($$obj{'version'}, $ver) |
|
390
|
0 |
0 |
0 |
$rv and $$rv{$$obj{'module'}} || $$rv{'ok'} |
|
443
|
0 |
0 |
0 |
_can_write('MM'->catfile($$CPAN::Config{'cpan_home'}, 'sources')) and _can_write($Config::Config{'sitelib'}) |
|
449
|
0 |
0 |
0 |
not $makeflags =~ /\bUNINST\b/ and eval " $> eq '0' " |
|
473
|
0 |
0 |
0 |
$obj and defined _version_check($obj->cpan_version, $ver) |
|
587
|
0 |
0 |
0 |
eval '$>' and lc(`sudo -V`) =~ /version/ |
|
|
0 |
0 |
0 |
eval '$>' and lc(`sudo -V`) =~ /version/ and _prompt("\n==> Should we try to re-execute the autoinstall process with 'sudo'?", -t STDIN ? 'y' : 'n') =~ /^[Yy]/ |
|
654
|
0 |
0 |
0 |
$version::VERSION || defined _load('version') and 'version'->can('new') |
|
689
|
0 |
0 |
0 |
$args{'EXE_FILES'} and -e 'MANIFEST' |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
138
|
0 |
0 |
0 |
$FeatureMap{lc $feature} || $feature |
|
180
|
0 |
0 |
0 |
$feature eq '-core' || $core_all |
|
182
|
0 |
0 |
0 |
$CheckOnly || _prompt('==> Auto-install the ' . @required / 2 . ($mandatory ? ' mandatory' : ' optional') . ' module(s) from CPAN?', $default ? 'y' : 'n') =~ /^[Yy]/ |
|
218
|
0 |
0 |
0 |
$CheckOnly || $UnderCPAN |
|
347
|
0 |
0 |
0 |
$conf->can('conf') or _can_write($conf->_get_build('base')) |
|
390
|
0 |
0 |
0 |
$$rv{$$obj{'module'}} || $$rv{'ok'} |
|
483
|
0 |
0 |
0 |
$rv ||= eval {
do {
$CPAN::META->instance('CPAN::Distribution', $obj->cpan_file)->{'install'} if $CPAN::META
}
} |
|
514
|
0 |
0 |
0 |
$INC{'CPANPLUS/Config.pm'} || _load('CPANPLUS::Shell::Default') |
|
566
|
0 |
0 |
0 |
_load('Socket') && Socket::inet_aton($site) || _prompt("\n*** Your host cannot resolve the domain name '${site}', which\n probably means the Internet connections are unavailable.\n==> Should we try to install the required module(s) anyway?", 'n') =~ /^[Yy]/ |
|
629
|
4 |
0 |
0 |
eval {
do {
require $file;
$mod->VERSION
}
} || ($@ ? undef : 0) |
|
653
|
0 |
0 |
4 |
ref $cur or ref $min |
|
|
0 |
0 |
4 |
ref $cur or ref $min or $cur =~ /v|\..*\./ |
|
|
0 |
0 |
4 |
ref $cur or ref $min or $cur =~ /v|\..*\./ or $min =~ /v|\..*\./ |
|
654
|
0 |
0 |
0 |
$version::VERSION || defined _load('version') |
|
|
0 |
0 |
0 |
$Sort::Versions::VERSION or defined _load('Sort::Versions') |
|
686
|
0 |
0 |
0 |
$UnderCPAN or $TestOnly |