line |
true |
false |
branch |
32
|
0 |
2 |
unless eval {
do {
my $m = 'Module::Data'->new($module);
$m->require;
$v = $m->version;
1
}
}
|
45
|
0 |
2 |
unless (defined $v)
|
46
|
0 |
0 |
if ($module eq 'App::DuckPAN' or $module eq 'DDG')
|
54
|
2 |
0 |
unless ref $v
|
75
|
0 |
0 |
if ($reinstall_latest eq 'reinstall') { }
|
|
0 |
0 |
elsif ($reinstall_latest eq 'latest') { }
|
88
|
0 |
0 |
unless $module
|
103
|
0 |
0 |
if $pinned_version
|
106
|
0 |
0 |
if ($installed_version == $self->app->dev_version)
|
112
|
0 |
0 |
if ($reinstall or $latest or not $installed_version) { }
|
|
0 |
0 |
elsif ($pinned_version) { }
|
|
0 |
0 |
elsif ($installed_version == $latest_version) { }
|
|
0 |
0 |
elsif ($installed_version > $latest_version) { }
|
116
|
0 |
0 |
unless $latest
|
119
|
0 |
0 |
if ($version != $latest_version)
|
120
|
0 |
0 |
unless ($duckpan_module_url = $self->find_previous_url($module, $version))
|
124
|
0 |
0 |
$reinstall ? :
|
130
|
0 |
0 |
if ($pinned_version != $installed_version) { }
|
133
|
0 |
0 |
if ($pinned_version == $latest_version or $duckpan_module_url = $self->find_previous_url($module, $pinned_version)) { }
|
142
|
0 |
0 |
$pinned_version == $latest_version ? :
|
159
|
0 |
0 |
if $install_it and not &first(sub {
$_ eq $duckpan_module_url;
}
, @to_install)
|
162
|
0 |
0 |
if (@to_install)
|
163
|
0 |
0 |
if $reinstall
|
164
|
0 |
0 |
if (system "cpanm @to_install")
|