| 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() : <LOCK> == getppid and ($$CPAN::Config{'prerequisites_policy'} || '') ne 'ignore'
|
|
304
|
1 |
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 |
1 |
not $makeflags =~ /\bUNINST\b/ and eval " $> eq '0' "
|
|
473
|
0 |
0 |
1 |
$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 |
1 |
$INC{'CPANPLUS/Config.pm'} || _load('CPANPLUS::Shell::Default')
|
|
566
|
1 |
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
|
2 |
0 |
2 |
eval {
do {
require $file;
$mod->VERSION
}
} || ($@ ? undef : 0)
|
|
653
|
0 |
0 |
2 |
ref $cur or ref $min
|
|
|
0 |
0 |
2 |
ref $cur or ref $min or $cur =~ /v|\..*\./
|
|
|
0 |
0 |
2 |
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
|