| line |
true |
false |
branch |
|
22
|
0 |
2 |
@argv ? : |
|
34
|
0 |
0 |
if ($self->{'command'} eq 'setup') { } |
|
|
0 |
0 |
elsif ($self->{'command'} eq 'perl') { } |
|
|
0 |
0 |
elsif ($self->{'command'} eq 'cpanm') { } |
|
|
0 |
0 |
elsif ($self->{'command'} eq 'bin') { } |
|
|
0 |
0 |
elsif ($self->{'command'} eq 'run') { } |
|
53
|
0 |
2 |
if -e 'cpanfile' |
|
57
|
0 |
2 |
if -e 'p5stack.yml' |
|
58
|
0 |
2 |
if -e "$ENV{'HOME'}.p5stack/p5stack.yml" |
|
59
|
1 |
1 |
if $ENV{'P5STACKCFG'} |
|
62
|
1 |
1 |
if ($file) |
|
68
|
0 |
2 |
if (file_name_is_absolute($config->{'perl'})) |
|
72
|
2 |
0 |
if ($self->{'perl'} eq 'system') |
|
76
|
1 |
1 |
if (exists $config->{'perl'} and $config->{'perl'} =~ /^[\d\.]+$/) |
|
81
|
1 |
0 |
unless -e $perl |
|
84
|
1 |
1 |
if exists $config->{$_} |
|
109
|
0 |
0 |
if ($self->{'deps'} eq 'dzil') |
|
111
|
0 |
0 |
unless $dzil |
|
113
|
0 |
0 |
unless (-e catfile($self->{'home'}, 'dist.ini')) |
|
119
|
0 |
0 |
if ($self->{'deps'} eq 'cpanfile') |
|
120
|
0 |
0 |
unless (-e catfile($self->{'home'}, 'cpanfile')) |
|
134
|
0 |
0 |
unless $cpanm |
|
142
|
0 |
0 |
if (-e $self->{'perl'}) |
|
153
|
0 |
0 |
unless -e dirname($dest) |
|
154
|
0 |
0 |
unless -e $dest |
|
190
|
0 |
0 |
unless @args |
|
194
|
0 |
0 |
if $self->{'command'} eq 'setup' |