| blib/lib/CPAN/FirstTime.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 226 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 766 | 0 | 0 | 0 | $args{'args'} && @{$args{'args'};} |
| 819 | 0 | 0 | 0 | $_conf && $_conf =~ /^y/i |
| 913 | 0 | 0 | 0 | $matcher and $$CPAN::Config{'test_report'} |
| 0 | 0 | 0 | $matcher and $$CPAN::Config{'test_report'} and $CPAN::META->has_inst('CPAN::Reporter') | |
| 0 | 0 | 0 | $matcher and $$CPAN::Config{'test_report'} and $CPAN::META->has_inst('CPAN::Reporter') and 'CPAN::Reporter'->can('configure') | |
| 977 | 0 | 0 | 0 | $path and 'File::Spec'->file_name_is_absolute($path) |
| 1043 | 0 | 0 | 0 | $default and $$CPAN::Config{'install_help'} eq 'sudo' |
| 1062 | 0 | 0 | 0 | exists $CPAN::HandleConfig::keys{'mbuild_install_build_command'} and $^O ne 'MSWin32' |
| 1330 | 0 | 0 | 0 | $matcher and not $$CPAN::Config{'auto_commit'} |
| 1426 | 0 | 0 | 0 | $CPAN::META->has_usable('File::HomeDir') and 'File::HomeDir'->VERSION >= 0.65 |
| 1443 | 0 | 0 | 0 | $CPAN::META->has_usable('Net::Ping') and 'Net::Ping'->VERSION gt '2.13' |
| 1479 | 0 | 0 | 0 | $matcher and not $progname =~ /$matcher/ |
| 1489 | 0 | 0 | 0 | $progname eq 'ncftp' and $$CPAN::Config{'ncftpget'} gt ' ' |
| 1521 | 0 | 0 | 0 | $progname eq 'make' and $disabling || !_check_found($path) |
| 1522 | 0 | 0 | 0 | $disabling and $showed_make_warning |
| 1536 | 0 | 0 | 0 | $shortcut and not $matcher |
| 1609 | 0 | 0 | 0 | $dir =~ /^~/ and !$last_ans || $ans ne $last_ans |
| 1634 | 0 | 0 | 0 | -d $ans and -w _ |
| 1652 | 0 | 0 | 0 | not $CPAN::FirstTime::auto_config and !$m || $item =~ /$m/ |
| 1672 | 0 | 0 | 0 | not $CPAN::FirstTime::auto_config and !$m || $item =~ /$m/ |
| 1689 | 0 | 0 | 0 | not $CPAN::FirstTime::auto_config and !$m || $item =~ /$m/ |
| 1723 | 0 | 0 | 0 | -f $mby and -f $m |
| 0 | 0 | 0 | -f $mby and -f $m and -M $m < -M $mby | |
| 1730 | 0 | 0 | 0 | $mby and -f $mby |
| 0 | 0 | 0 | $mby and -f $mby and -s _ > 0 | |
| 1793 | 0 | 0 | 0 | -f $mby and -s _ > 0 |
| 1853 | 0 | 0 | 0 | $require_nonempty and not @nums |
| 1957 | 0 | 0 | 0 | @previous_urls and @countries |
| 2061 | 0 | 0 | 0 | -w $CPAN::FirstTime::Config{'installprivlib'} && -w $CPAN::FirstTime::Config{'installarchlib'} && -w $CPAN::FirstTime::Config{'installsitelib'} && -w $CPAN::FirstTime::Config{'installsitearch'} |
| 2068 | 0 | 0 | 0 | $ENV{'PERL_MM_OPT'} and $ENV{'PERL_MM_OPT'} =~ /install_base/i |
| line | l | !l | condition |
|---|---|---|---|
| 801 | 0 | 0 | $CPAN::Config ||= {} |
| 843 | 0 | 0 | $$CPAN::Config{'install_help'} ||= '' |
| 968 | 0 | 0 | $$CPAN::Config{'pager'} || $ENV{'PAGER'} || find_exe('less', \@path) || find_exe('more', \@path) || ($^O eq 'MacOS' ? $ENV{'EDITOR'} : 0) || 'more' |
| 987 | 0 | 0 | $path ||= 'sh' |
| 1042 | 0 | 0 | $$CPAN::Config{'make'} || '' |
| 1056 | 0 | 0 | $$CPAN::Config{'make_arg'} || '' |
| 1110 | 0 | 0 | $ENV{$_} || '' |
| 1116 | 0 | 0 | $$CPAN::Config{'proxy_user'} || $CPAN::LWP::UserAgent::USER || '' |
| 1268 | 0 | 0 | $$CPAN::Config{'urllist'} ||= [] |
| 1313 | 0 | 0 | $err ||= 'Could not locate local::lib in the CPAN index' |
| 1491 | 0 | 0 | $$CPAN::Config{$progname} || $Config::Config{$progname} || '' |
| 1804 | 0 | 0 | $path ||= [split(/$CPAN::FirstTime::Config{'path_sep'}/, $ENV{'PATH'}, 0)] |
| 1819 | 0 | 0 | $default ||= '' |
| 1886 | 0 | 0 | $pos ||= 0 |
| 2027 | 0 | 0 | $INC{'CPAN/MyConfig.pm'} || $INC{'CPAN/Config.pm'} || 'configuration file' |
| 2069 | 0 | 0 | $$CPAN::Config{$_} || '' |
| 2075 | 0 | 0 | $$CPAN::Config{$_} || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 835 | 0 | 0 | 0 | $matcher or _can_write_to_libdirs() |
| 0 | 0 | 0 | $matcher or _can_write_to_libdirs() or _using_installbase() | |
| 0 | 0 | 0 | $matcher or _can_write_to_libdirs() or _using_installbase() or _using_sudo() | |
| 845 | 0 | 0 | 0 | not $matcher or "\n build_dir\n build_dir_reuse\n cpan_home\n keep_source_where\n prefs_dir\n " =~ /$matcher/ |
| 911 | 0 | 0 | 0 | not $matcher or 'test_report' =~ /$matcher/ |
| 933 | 0 | 0 | 0 | not $matcher or 'yaml_module' =~ /$matcher/ |
| 937 | 0 | 0 | 0 | $CPAN::FirstTime::auto_config or $CPAN::META->has_inst($$CPAN::Config{'yaml_module'}) |
| 954 | 0 | 0 | 0 | $matcher or $CPAN::FirstTime::auto_config |
| 982 | 0 | 0 | 0 | $path ||= $ENV{'SHELL'} |
| 983 | 0 | 0 | 0 | $path ||= $ENV{'COMSPEC'} |
| 1026 | 0 | 0 | 0 | not $matcher or 'makepl_arg make_arg' =~ /$matcher/ |
| 1105 | 0 | 0 | 0 | not $matcher or "@proxy_vars @proxy_user_vars" =~ /$matcher/ |
| 1113 | 0 | 0 | 0 | $$CPAN::Config{'ftp_proxy'} or $$CPAN::Config{'http_proxy'} |
| 1185 | 0 | 0 | 0 | $FG || $BG |
| 1219 | 0 | 0 | 0 | not $matcher or 'histfile histsize' =~ /$matcher/ |
| 1239 | 0 | 0 | 0 | not $matcher or 'show_unparsable_versions' =~ /$matcher/ |
| 0 | 0 | 0 | not $matcher or 'show_unparsable_versions' =~ /$matcher/ or 'show_zero_versions' =~ /$matcher/ | |
| 1270 | 0 | 0 | 0 | not $matcher or 'urllist' =~ /$matcher/ |
| 1312 | 0 | 0 | 0 | not $dist or my $err = $@ |
| 1351 | 0 | 0 | 0 | $$CPAN::Config{'shell'} || $ENV{'SHELL'} |
| 1425 | 0 | 0 | 0 | $local_lib_home ||= 'File::Spec'->rel2abs(do { if ($CPAN::META->has_usable('File::HomeDir') and 'File::HomeDir'->VERSION >= 0.65) { 'File::HomeDir'->my_home; } elsif (defined $ENV{'HOME'}) { $ENV{'HOME'}; } else { '~' unless (getpwuid $<)[7]; } }) |
| 1473 | 0 | 0 | 0 | not $matcher or "@external_progs" =~ /$matcher/ |
| 1510 | 0 | 0 | 0 | $path ||= find_exe($progcall, $PATH) |
| 1521 | 0 | 0 | 0 | $disabling || !_check_found($path) |
| 1587 | 0 | 0 | 0 | not $matcher or 'cpan_home' =~ /$matcher/ |
| 1588 | 0 | 0 | 0 | $$CPAN::Config{'cpan_home'} || CPAN::HandleConfig::cpan_home() |
| 1609 | 0 | 0 | 0 | !$last_ans || $ans ne $last_ans |
| 1650 | 0 | 0 | 0 | $$CPAN::Config{$item} || $dflt |
| 1652 | 0 | 0 | 0 | !$m || $item =~ /$m/ |
| 1672 | 0 | 0 | 0 | !$m || $item =~ /$m/ |
| 1686 | 0 | 0 | 0 | $$CPAN::Config{$item} || $dflt |
| 1689 | 0 | 0 | 0 | !$m || $item =~ /$m/ |
| 1843 | 0 | 0 | 0 | /\D/ || $_ < 1 || $_ > $i |
| 2009 | 0 | 0 | 0 | $ans or not %seen |