| line |
true |
false |
branch |
|
25
|
5 |
1 |
if ($atree) |
|
28
|
1 |
4 |
unless (defined $current_tree and $atree->tree->id eq $current_tree->id) |
|
33
|
2 |
4 |
if (not $atree and $atree = $c->cpan_repo->get_archive_tree($branch_name)) |
|
34
|
0 |
2 |
if ($c->branch_head_only and not defined $atree->branch) { } |
|
60
|
0 |
1 |
if $have_tree_rb_xs |
|
68
|
0 |
1 |
if ($atree) { } |
|
69
|
0 |
0 |
unless builtin::blessed($atree) and $atree->can("get_path") |
|
76
|
0 |
1 |
$atree ? : |
|
85
|
0 |
6 |
unless ($c->archive_tree) |
|
94
|
0 |
2 |
unless $c->check_branch_exists |
|
104
|
0 |
4 |
unless $c->check_branch_exists |
|
111
|
3 |
0 |
$ent->[0]->is_blob ? : |
|
|
3 |
1 |
$ent ? : |
|
112
|
3 |
1 |
if ($ent) { } |
|
|
0 |
1 |
elsif ($path =~ /(.*?)\.gz\z/u and $ent = $c->archive_tree->get_path($1) and $ent->[0]->is_blob) { } |
|
|
1 |
0 |
elsif ($path =~ /(.*?)\.tar\.gz\z/u and $ent = $c->archive_tree->get_path("$1.meta") and $ent->[0]->is_blob and $ent = $c->archive_tree->get_path($1) and $ent->[0]->is_tree) { } |
|
113
|
3 |
0 |
if ($ent->[0]->is_blob) { } |
|
144
|
0 |
2 |
unless gzip(\$data, \$gzipped) |
|
147
|
2 |
0 |
if length $filename |