| line |
!l |
l&&!r |
l&&r |
condition |
|
383
|
0 |
0 |
0 |
ref $err and $err->isa('CPAN::Exception::blocked_urllist') |
|
416
|
0 |
0 |
0 |
ref $err and $reported_error eq ref $err |
|
447
|
0 |
0 |
0 |
$CPAN::term and $CPAN::term->can('ornaments') |
|
472
|
0 |
0 |
0 |
$CPAN::term and $CPAN::term->can('GetHistory') |
|
521
|
3 |
0 |
0 |
$yaml_module ne 'YAML' and not $CPAN::META->has_inst($yaml_module) |
|
529
|
0 |
3 |
0 |
$yaml_module eq 'YAML' and $CPAN::META->has_inst($yaml_module) |
|
|
3 |
0 |
0 |
$yaml_module eq 'YAML' and $CPAN::META->has_inst($yaml_module) and $YAML::VERSION < 0.6 |
|
|
3 |
0 |
0 |
$yaml_module eq 'YAML' and $CPAN::META->has_inst($yaml_module) and $YAML::VERSION < 0.6 and not $CPAN::Have_warned->{'YAML'}++ |
|
626
|
1 |
0 |
126 |
$negative_cache->{'time'} and time < $negative_cache->{'time'} + 60 |
|
632
|
1 |
0 |
0 |
$CPAN::Config->{'use_sqlite'} && ($CPAN::SQLite || &_init_sqlite()) |
|
706
|
0 |
0 |
0 |
-f $lockfile and -M _ > 0 |
|
712
|
0 |
0 |
0 |
defined $otherpid and length $otherpid |
|
715
|
0 |
0 |
0 |
defined $otherhost and length $otherhost |
|
720
|
0 |
0 |
0 |
defined $otherhost and defined $thishost |
|
|
0 |
0 |
0 |
defined $otherhost and defined $thishost and $otherhost ne '' |
|
|
0 |
0 |
0 |
defined $otherhost and defined $thishost and $otherhost ne '' and $thishost ne '' |
|
|
0 |
0 |
0 |
defined $otherhost and defined $thishost and $otherhost ne '' and $thishost ne '' and $otherhost ne $thishost |
|
|
0 |
0 |
0 |
defined $otherpid and $otherpid |
|
945
|
0 |
0 |
0 |
'MM'->maybe_command($perl) && `$perl -MConfig=myconfig -e print -e myconfig` eq 'Config'->myconfig |
|
963
|
0 |
0 |
0 |
defined $path and length $path |
|
|
0 |
0 |
0 |
defined $path and length $path and -d $path |
|
967
|
0 |
0 |
0 |
defined $exe and length $exe |
|
979
|
0 |
0 |
0 |
'MM'->maybe_command($perl) and _perl_is_same($perl) |
|
1156
|
42 |
0 |
6 |
defined $message and $message eq 'no' |
|
1219
|
0 |
0 |
0 |
defined $CPAN::Config->{'gpg'} and $CPAN::Config->{'gpg'} =~ /\S/ |
|
1275
|
0 |
12 |
0 |
$ineval and not $CPAN::End |
|
1371
|
0 |
0 |
0 |
$d->{'build_dir'} and $d->{'build_dir'} eq $dbd |
|
1401
|
0 |
0 |
0 |
defined $env and length $env |
| line |
l |
!l |
condition |
|
264
|
0 |
0 |
shift() || '' |
|
265
|
0 |
0 |
$CPAN::CurrentCommandId ||= 1 |
|
520
|
0 |
3 |
$CPAN::Config->{'yaml_module'} || 'YAML' |
|
556
|
0 |
0 |
$CPAN::Config->{'yaml_load_code'} || 0 |
|
922
|
3 |
9 |
$CPAN::Config->{'getcwd'} || 'cwd' |
|
994
|
31 |
0 |
$id ||= '' |
|
1160
|
3 |
6 |
$CPAN::META->{'dontload_hash'}{$mod} ||= 1 |
|
1246
|
43 |
0 |
$id ||= '' |
|
1260
|
0 |
0 |
$self->{'exit_messages'} ||= [] |
|
1296
|
0 |
0 |
$CPAN::Config->{'histsize'} || 100 |
|
1316
|
0 |
0 |
$CPAN::Config->{'histsize'} || 100 |
|
1363
|
0 |
0 |
$self->{'is_tested'}{$b} || 0 |
|
|
0 |
0 |
$self->{'is_tested'}{$a} || 0 |
|
1396
|
0 |
0 |
$self->{'is_tested'} ||= {} |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
262
|
0 |
0 |
0 |
shift() || 'CPAN::Prompt'->new |
|
270
|
0 |
0 |
0 |
not $CPAN::term or $CPAN::term->ReadLine eq 'Term::ReadLine::Stub' |
|
434
|
0 |
0 |
0 |
$CPAN::META->has_inst('Term::ReadLine::Gnu') or $CPAN::META->has_inst('Term::ReadLine::Perl') |
|
450
|
0 |
0 |
0 |
not defined $last_term_ornaments or $_ != $last_term_ornaments |
|
508
|
0 |
0 |
0 |
$Config::Config{'d_flock'} or $Config::Config{'d_fcntl_can_lock'} |
|
620
|
0 |
0 |
0 |
$CPAN::SQLite ||= 'CPAN::SQLite::META'->new($CPAN::META) |
|
735
|
0 |
0 |
0 |
kill 0, $otherpid or $!{'EPERM'} |
|
837
|
0 |
0 |
0 |
$CPAN::RUN_DEGRADED or $self->{'LOCKFH'} |
|
998
|
0 |
0 |
0 |
exists $CPAN::META->{'readonly'}{$class}{$id} || $CPAN::SQLite->set($class, $id) |
|
1003
|
5 |
0 |
26 |
$exists ||= exists $CPAN::META->{'readwrite'}{$class}{$id} |
|
1156
|
6 |
0 |
42 |
defined $message and $message eq 'no' or $dont{$mod} |
|
1219
|
0 |
0 |
0 |
eval {
do {
require Crypt::OpenPGP;
1
}
} or defined $CPAN::Config->{'gpg'} and $CPAN::Config->{'gpg'} =~ /\S/ |
|
1249
|
0 |
39 |
0 |
$CPAN::META->{'readwrite'}{$class}{$id} ||= $class->new('ID', $id) |
|
1279
|
0 |
0 |
0 |
$CPAN::META->{'cachemgr'} ||= 'CPAN::CacheMgr'->new('atexit') |