line |
true |
false |
branch |
39
|
0 |
0 |
unless (scalar @ARGV) |
44
|
0 |
0 |
if ($flags{'diff'} and scalar @ARGV != 2) |
49
|
0 |
0 |
if ($flags{'diff'} and not -e $ARGV[0] && -e $ARGV[1]) |
54
|
0 |
0 |
if ($flags{'mode'} and not $flags{'mode'} =~ /^(compile|u(se)?|runtime|r(eq)?|package|p(rov)?|a(ll)?)$/) |
60
|
0 |
0 |
if ($flags{'jobs'} and not $flags{'jobs'} =~ /^(auto|\d+)$/) |
65
|
0 |
0 |
if ($flags{'help'}) |
68
|
0 |
0 |
if ($flags{'compact'} and $flags{'mode'} ne 'all') |
73
|
0 |
0 |
if ($flags{'compact'} and $flags{'files'}) |
82
|
0 |
0 |
if $flags{'mode'} |
90
|
0 |
0 |
if $flags{'mode'} =~ /^(compile|u(se)?)$/ |
91
|
0 |
0 |
if $flags{'mode'} =~ /^(runtime|r(eq)?)$/ |
92
|
0 |
0 |
if $flags{'mode'} =~ /^(package|p(rov)?)$/ |
126
|
0 |
0 |
$flags{'all'} ? : |
130
|
0 |
0 |
if (-d $arg) { } |
|
0 |
0 |
elsif (-f $arg) { } |
147
|
0 |
0 |
if ($@) |
168
|
0 |
0 |
unless my $files = extract($archive, $tmpdir->dirname) |
170
|
0 |
0 |
if -f $newdir |
179
|
0 |
0 |
if ($flags{'diff'}) { } |
181
|
0 |
0 |
-d $ARGV[0] ? : |
182
|
0 |
0 |
-d $ARGV[1] ? : |
195
|
0 |
0 |
$_->version ? : |
|
0 |
0 |
if $_->file eq $file |
203
|
0 |
0 |
$_->version ? : |
|
0 |
0 |
if $_->file eq $file |
213
|
0 |
0 |
if ($flags{'files'}) { } |
216
|
0 |
0 |
if ($md->file ne $lastfile) |
220
|
0 |
0 |
$md->version ? : |
231
|
0 |
0 |
if $md->name eq $skip |
232
|
0 |
0 |
if ($md->name ne $lastname) |
234
|
0 |
0 |
if ($flags{'compact'} and $md->type eq 'p') |
240
|
0 |
0 |
$md->version ? : |
254
|
0 |
0 |
if $type eq 'p' |
255
|
0 |
0 |
if $type eq 'c' |
256
|
0 |
0 |
if $type eq 'r' |
269
|
0 |
0 |
if ($by eq 'name') { } |
|
0 |
0 |
elsif ($by eq 'file') { } |
280
|
0 |
0 |
$b->type eq 'p' ? : |
|
0 |
0 |
$a->type eq 'p' ? : |
|
0 |
0 |
unless $first[0] cmp $first[1] or $a->type eq 'p' ? -1 : ($b->type eq 'p' ? 1 : $a->type cmp $b->type) or $second[0] cmp $second[1] |