| 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') { } |
|
52
|
0 |
2 |
if -e 'cpanfile' |
|
56
|
0 |
2 |
if -e 'p5stack.yml' |
|
57
|
0 |
2 |
if -e "$ENV{'HOME'}.p5stack/p5stack.yml" |
|
58
|
1 |
1 |
if $ENV{'P5STACKCFG'} |
|
61
|
1 |
1 |
if ($file) |
|
67
|
0 |
2 |
if (file_name_is_absolute($config->{'perl'})) |
|
71
|
2 |
0 |
if ($self->{'perl'} eq 'system') |
|
75
|
1 |
1 |
if (exists $config->{'perl'} and $config->{'perl'} =~ /^[\d\.]+$/) |
|
80
|
1 |
0 |
unless -e $perl |
|
83
|
1 |
1 |
if exists $config->{$_} |
|
108
|
0 |
0 |
if ($self->{'deps'} eq 'dzil') |
|
110
|
0 |
0 |
unless $dzil |
|
112
|
0 |
0 |
unless (-e catfile($self->{'home'}, 'dist.ini')) |
|
118
|
0 |
0 |
if ($self->{'deps'} eq 'cpanfile') |
|
119
|
0 |
0 |
unless (-e catfile($self->{'home'}, 'cpanfile')) |
|
133
|
0 |
0 |
unless $cpanm |
|
141
|
0 |
0 |
if (-e $self->{'perl'}) |
|
152
|
0 |
0 |
unless -e dirname($dest) |
|
153
|
0 |
0 |
unless -e $dest |
|
189
|
0 |
0 |
unless @args |
|
193
|
0 |
0 |
if $self->{'command'} eq 'setup' |