| blib/lib/CPAN/FirstTime.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 232 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 835 | 0 | 0 | 0 | $args{'args'} && @{$args{'args'};} |
| 888 | 0 | 0 | 0 | $_conf && $_conf =~ /^y/i |
| 983 | 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") | |
| 1047 | 0 | 0 | 0 | $path and "File::Spec"->file_name_is_absolute($path) |
| 1113 | 0 | 0 | 0 | $default and $CPAN::Config->{'install_help'} eq "sudo" |
| 1132 | 0 | 0 | 0 | exists $CPAN::HandleConfig::keys{'mbuild_install_build_command'} and $^O ne "MSWin32" |
| 1400 | 0 | 0 | 0 | $locallib and $dist = $locallib->distribution |
| 1426 | 0 | 0 | 0 | $matcher and not $CPAN::Config->{'auto_commit'} |
| 1522 | 0 | 0 | 0 | $CPAN::META->has_usable("File::HomeDir") and "File::HomeDir"->VERSION >= "0.65" |
| 1539 | 0 | 0 | 0 | $CPAN::META->has_usable("Net::Ping") and "CPAN::Version"->vgt("Net::Ping"->VERSION, "2.13") |
| 1575 | 0 | 0 | 0 | $matcher and not $progname =~ /$matcher/ |
| 1585 | 0 | 0 | 0 | $progname eq "ncftp" and $CPAN::Config->{'ncftpget'} gt " " |
| 1617 | 0 | 0 | 0 | $progname eq "make" and $disabling || !_check_found($path) |
| 1618 | 0 | 0 | 0 | $disabling and $showed_make_warning |
| 1632 | 0 | 0 | 0 | $shortcut and not $matcher |
| 1710 | 0 | 0 | 0 | $dir =~ /^~/ and !$last_ans || $ans ne $last_ans |
| 1735 | 0 | 0 | 0 | -d $ans and -w _ |
| 1753 | 0 | 0 | 0 | not $CPAN::FirstTime::auto_config and !$m || $item =~ /$m/ |
| 1772 | 0 | 0 | 0 | not $CPAN::FirstTime::auto_config and !$m || $item =~ /$m/ |
| 1789 | 0 | 0 | 0 | not $CPAN::FirstTime::auto_config and !$m || $item =~ /$m/ |
| 1824 | 0 | 0 | 0 | -f $mby and -f $m |
| 0 | 0 | 0 | -f $mby and -f $m and -M $m < -M $mby | |
| 1831 | 0 | 0 | 0 | $mby and -f $mby |
| 0 | 0 | 0 | $mby and -f $mby and -s _ > 0 | |
| 1894 | 0 | 0 | 0 | -f $mby and -s _ > 0 |
| 1954 | 0 | 0 | 0 | $require_nonempty and not @nums |
| 2023 | 0 | 0 | 0 | $_ and ref $_ |
| 2066 | 0 | 0 | 0 | @previous_urls and @countries |
| 2174 | 0 | 0 | 0 | -w $CPAN::FirstTime::Config{'installprivlib'} && -w $CPAN::FirstTime::Config{'installarchlib'} && -w $CPAN::FirstTime::Config{'installsitelib'} && -w $CPAN::FirstTime::Config{'installsitearch'} |
| 2177 | 0 | 0 | 0 | $ENV{'PERL_MM_OPT'} and $ENV{'PERL_MM_OPT'} =~ /install_base/i |
| line | l | !l | condition |
|---|---|---|---|
| 870 | 0 | 0 | $CPAN::Config ||= {} |
| 912 | 0 | 0 | $CPAN::Config->{'install_help'} ||= "" |
| 1040 | 0 | 0 | $CPAN::Config->{'pager'} || $ENV{'PAGER'} || find_exe('less', \@path) || find_exe('more', \@path) || ($^O eq 'MacOS' ? $ENV{'EDITOR'} : 0) || 'more' |
| 1057 | 0 | 0 | $path ||= "sh" |
| 1112 | 0 | 0 | $CPAN::Config->{'make'} || '' |
| 1126 | 0 | 0 | $CPAN::Config->{'make_arg'} || '' |
| 1188 | 0 | 0 | $ENV{$_} || '' |
| 1194 | 0 | 0 | $CPAN::Config->{'proxy_user'} || $CPAN::LWP::UserAgent::USER || '' |
| 1353 | 0 | 0 | $CPAN::Config->{'urllist'} ||= [] |
| 1409 | 0 | 0 | $err ||= "Could not locate local::lib in the CPAN index" |
| 1588 | 0 | 0 | $CPAN::Config->{$progname} || $Config::Config{$progname} || '' |
| 1905 | 0 | 0 | $path ||= [split(/$CPAN::FirstTime::Config{'path_sep'}/, $ENV{'PATH'}, 0)] |
| 1920 | 0 | 0 | $default ||= "" |
| 1987 | 0 | 0 | $pos ||= 0 |
| 2143 | 0 | 0 | $INC{'CPAN/MyConfig.pm'} || $INC{'CPAN/Config.pm'} || 'configuration file' |
| 2178 | 0 | 0 | $CPAN::Config->{$_} || '' |
| 2184 | 0 | 0 | $CPAN::Config->{$_} || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 904 | 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() | |
| 914 | 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/ |
| 981 | 0 | 0 | 0 | not $matcher or "test_report" =~ /$matcher/ |
| 1003 | 0 | 0 | 0 | not $matcher or "yaml_module" =~ /$matcher/ |
| 1007 | 0 | 0 | 0 | $CPAN::FirstTime::auto_config or $CPAN::META->has_inst($CPAN::Config->{'yaml_module'}) |
| 1025 | 0 | 0 | 0 | $matcher or $CPAN::FirstTime::auto_config |
| 1052 | 0 | 0 | 0 | $path ||= $ENV{'SHELL'} |
| 1053 | 0 | 0 | 0 | $path ||= $ENV{'COMSPEC'} |
| 1096 | 0 | 0 | 0 | not $matcher or "makepl_arg make_arg" =~ /$matcher/ |
| 1183 | 0 | 0 | 0 | not $matcher or "@proxy_vars @proxy_user_vars" =~ /$matcher/ |
| 1191 | 0 | 0 | 0 | $CPAN::Config->{'ftp_proxy'} or $CPAN::Config->{'http_proxy'} |
| 1263 | 0 | 0 | 0 | $FG || $BG |
| 1297 | 0 | 0 | 0 | not $matcher or "histfile histsize" =~ /$matcher/ |
| 1317 | 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/ | |
| 1355 | 0 | 0 | 0 | not $matcher or "urllist" =~ /$matcher/ |
| 1408 | 0 | 0 | 0 | not $dist or my $err = $@ |
| 1447 | 0 | 0 | 0 | $CPAN::Config->{'shell'} || $ENV{'SHELL'} |
| 1521 | 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]; } }) |
| 1569 | 0 | 0 | 0 | not $matcher or join($", @external_progs) =~ /$matcher/ |
| 1606 | 0 | 0 | 0 | $path ||= find_exe($progcall, $PATH) |
| 1617 | 0 | 0 | 0 | $disabling || !_check_found($path) |
| 1688 | 0 | 0 | 0 | not $matcher or "cpan_home" =~ /$matcher/ |
| 1690 | 0 | 0 | 0 | $CPAN::Config->{'cpan_home'} || CPAN::HandleConfig::cpan_home() |
| 1710 | 0 | 0 | 0 | !$last_ans || $ans ne $last_ans |
| 1751 | 0 | 0 | 0 | $CPAN::Config->{$item} || $dflt |
| 1753 | 0 | 0 | 0 | !$m || $item =~ /$m/ |
| 1772 | 0 | 0 | 0 | !$m || $item =~ /$m/ |
| 1786 | 0 | 0 | 0 | $CPAN::Config->{$item} || $dflt |
| 1789 | 0 | 0 | 0 | !$m || $item =~ /$m/ |
| 1944 | 0 | 0 | 0 | /\D/ || $_ < 1 || $_ > $i |
| 2118 | 0 | 0 | 0 | $ans or not %seen |