blib/lib/CPAN/Shell.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 8 | 165 | 4.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
403 | 0 | 0 | 0 | defined $o_what[0] and $o_what[0] =~ /help/i |
407 | 0 | 0 | 0 | $what =~ s/^-// and exists $CPAN::DEBUG{$what} |
533 | 0 | 0 | 0 | $S{'start'} and $S{'end'} |
537 | 0 | 0 | 0 | $res->{'ok'} and @{$res->{'ok'};} |
546 | 0 | 0 | 0 | $res->{'no'} and @{$res->{'no'};} |
609 | 0 | 0 | 0 | $file and -f $file |
641 | 0 | 0 | 0 | $includefile = $INC{$f} and -e $includefile |
885 | 0 | 0 | 0 | $what and $what =~ /^[aru]$/ |
1006 | 0 | 0 | 0 | $CPAN::Shell::COLOR_REGISTERED and $CPAN::META->has_inst('Term::ANSIColor') |
0 | 0 | 0 | $CPAN::Shell::COLOR_REGISTERED and $CPAN::META->has_inst('Term::ANSIColor') and $module->description | |
1089 | 0 | 0 | 0 | $only_id && $silent |
1135 | 0 | 0 | 0 | $only_id and $only_id != (UNIVERSAL::can($d->{$nosayer}, 'commandid') ? $d->{$nosayer}->commandid : $CPAN::CurrentCommandId) |
1356 | 0 | 0 | 0 | $obj and UNIVERSAL::can($obj, 'id') |
0 | 0 | 0 | $obj and UNIVERSAL::can($obj, 'id') and $obj->id | |
1483 | 241 | 0 | 0 | $colorize_output and $^O eq 'MSWin32' |
241 | 0 | 0 | $colorize_output and $^O eq 'MSWin32' and not $CPAN::META->has_inst('Win32::Console::ANSI') | |
1491 | 241 | 0 | 0 | $colorize_output and not $CPAN::META->has_inst('Term::ANSIColor') |
1523 | 0 | 0 | 0 | $CPAN::DEBUG and $swhat =~ /^Debug\(/ |
1745 | 0 | 0 | 0 | $s =~ /[\$\@\%]/ and $meth eq 'dump' |
1753 | 0 | 0 | 0 | ref $@ and $@->isa('CPAN::Exception::RecursiveDependency') |
1843 | 0 | 0 | 0 | $obj->{'reqtype'} eq 'b' and $reqtype =~ /^[rc]$/ |
1845 | 0 | 0 | 0 | exists $obj->{'install'} and UNIVERSAL::can($obj->{'install'}, 'failed') ? $obj->{'install'}->failed : $obj->{'install'} =~ /^NO/ |
1864 | 0 | 0 | 0 | $pragma and $obj->can($pragma) |
1897 | 0 | 0 | 0 | $meth eq 'make' and $obj->{'reqtype'} eq 'b' |
1919 | 0 | 0 | 0 | $CPAN::Config->{'halt_on_failure'} and $obj->{'mandatory'} |
0 | 0 | 0 | $CPAN::Config->{'halt_on_failure'} and $obj->{'mandatory'} and &CPAN::Distrostatus::something_has_just_failed() | |
0 | 0 | 0 | $CPAN::Config->{'halt_on_failure'} and $obj->{'mandatory'} and &CPAN::Distrostatus::something_has_just_failed() and $self->mandatory_dist_failed |
line | l | !l | condition |
---|---|---|---|
369 | 0 | 0 | $o_type ||= '' |
375 | 0 | 0 | $cfilter ||= '' |
490 | 0 | 0 | $fullstats->{'history'} || [] |
510 | 0 | 0 | $last->{'filesize'} || 0 |
512 | 0 | 0 | $S{'ok'}{$url} ||= {} |
514 | 0 | 0 | $s->{'dlsize'} ||= 0 |
516 | 0 | 0 | $s->{'dltime'} ||= 0 |
561 | 0 | 0 | $command ||= '' |
625 | 0 | 0 | $CPAN::Shell::reload->{$f} ||= -1 |
627 | 0 | 0 | $args ||= {} |
766 | 0 | 0 | $stems{$stem} ||= [] |
965 | 0 | 0 | $inst_file || '' |
981 | 0 | 0 | $seen{$file} ||= 0 |
1169 | 0 | 0 | $d->{$failed}{'TIME'} || 0 |
1525 | 0 | 0 | $CPAN::Config->{'colorize_debug'} || 'black on_cyan' |
1527 | 0 | 0 | eval { do { Term::ANSIColor::color($ornament) } } || '' |
1556 | 0 | 239 | $CPAN::Config->{'colorize_print'} || 'bold blue on_white' |
1588 | 0 | 2 | $CPAN::Config->{'colorize_warn'} || 'bold red on_white' |
1615 | 0 | 0 | $ornament ||= 'colorize_print' |
1617 | 0 | 0 | $CPAN::Config->{$ornament} || 'bold blue on_white' |
1618 | 0 | 0 | eval { do { Term::ANSIColor::color($ornament) } } || '' |
1802 | 0 | 0 | $q->reqtype || '' |
1803 | 0 | 0 | $q->optional || '' |
1815 | 0 | 0 | $obj->{'reqtype'} ||= '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
374 | 0 | 0 | 0 | not @o_what or $cfilter |
508 | 0 | 0 | 0 | $S{'end'} ||= $last->{'end'} |
628 | 0 | 0 | 0 | $must_reload ||= $args->{'reloforce'} |
1026 | 0 | 0 | 0 | not @expand or $what eq 'u' |
1289 | 0 | 0 | 7 | $s =~ m[/] or substr($s, -1, 1) eq '.' |
1370 | 0 | 0 | 0 | $err ||= $@ |
1571 | 0 | 5 | 2 | not $CPAN::Config->{$vname} or $CPAN::Config->{$vname} =~ /^v/ |
1655 | 0 | 0 | 0 | $ENV{'AUTOMATED_TESTING'} or not -t STDOUT |
1817 | 0 | 0 | 0 | $type eq 'CPAN::Distribution' or $type eq 'CPAN::Bundle' |
1818 | 0 | 0 | 0 | $obj->{'mandatory'} ||= !$optional |
1821 | 0 | 0 | 0 | $obj->{'mandatory'} ||= !$optional |
1823 | 0 | 0 | 0 | $d->{'mandatory'} ||= !$optional |