| 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') { } |
|
54
|
0 |
2 |
if -e 'cpanfile' |
|
58
|
0 |
2 |
if -e 'p5stack.yml' |
|
59
|
0 |
2 |
if -e "$ENV{'HOME'}.p5stack/p5stack.yml" |
|
60
|
1 |
1 |
if $ENV{'P5STACKCFG'} |
|
63
|
1 |
1 |
if ($file) |
|
69
|
0 |
2 |
if (file_name_is_absolute($config->{'perl'})) |
|
73
|
2 |
0 |
if ($self->{'perl'} eq 'system') |
|
77
|
1 |
1 |
if (exists $config->{'perl'} and $config->{'perl'} =~ /^[\d\.]+$/) |
|
82
|
1 |
0 |
unless -e $perl |
|
85
|
1 |
1 |
if exists $config->{$_} |
|
99
|
0 |
0 |
unless -e $self->{'p5stack_root'} |
|
113
|
0 |
0 |
if ($self->{'deps'} eq 'dzil') |
|
115
|
0 |
0 |
unless (-e catfile($self->{'home'}, 'dist.ini')) |
|
121
|
0 |
0 |
if ($dzil) { } |
|
133
|
0 |
0 |
if ($self->{'deps'} eq 'cpanfile') |
|
134
|
0 |
0 |
unless (-e catfile($self->{'home'}, 'cpanfile')) |
|
141
|
0 |
0 |
if ($self->{'cpanm_flag'}) |
|
151
|
0 |
0 |
unless $cpanm |
|
159
|
0 |
0 |
if (-e $self->{'perl'}) |
|
170
|
0 |
0 |
unless -e dirname($dest) |
|
171
|
0 |
0 |
unless -e $dest |
|
207
|
0 |
0 |
unless @args |
|
211
|
0 |
0 |
if $self->{'command'} eq 'setup' |