line |
true |
false |
branch |
33
|
0 |
0 |
if ($$opt{'list'} and $$args[0]) { } |
|
0 |
0 |
elsif ($$opt{'list'}) { } |
|
0 |
0 |
elsif ($$opt{'help'} or not @$args) { } |
67
|
0 |
0 |
if ($path) { } |
76
|
0 |
0 |
if $$opt{'test'} |
78
|
0 |
0 |
if (@install) |
79
|
0 |
0 |
if ($$opt{'minus'}) { } |
80
|
0 |
0 |
$$opt{'force'} ? : |
83
|
0 |
0 |
if ($$opt{'force'}) { } |
99
|
0 |
0 |
unless my $info = $self->parse_entry($$entry{'body'}, $$entry{'date'}) |
100
|
0 |
0 |
if ($$info{'dist'} eq $dist) |
101
|
0 |
0 |
if ($$info{'version'} =~ /_|-TRIAL/ and not $$opt{'devel'}) |
116
|
0 |
0 |
if ($$opt{'minus'}) |
125
|
0 |
0 |
if ($res->is_error) |
136
|
0 |
0 |
unless my $info = $self->parse_entry($$entry{'body'}, $$entry{'date'}) |
144
|
0 |
0 |
unless my $time = 'Time::Piece'->strptime($date, '%Y-%m-%dT%H:%M:%SZ') |
145
|
0 |
0 |
if (time - $time->epoch > $duration) |
150
|
0 |
0 |
if ($body =~ /^([\w\-]+) (v?[0-9\._]*(?:-TRIAL)?) by (.+?) -
|
171
|
0 |
0 |
if $opts |
176
|
0 |
0 |
if ($res->is_error) |