| line |
true |
false |
branch |
|
25
|
0 |
13 |
@_ == 1 ? :
|
|
26
|
0 |
13 |
unless (defined $args{'directory'})
|
|
36
|
4 |
2 |
unless +(shift())->{'metacpan_lookup_size'}
|
|
43
|
4 |
8 |
if ($self->{'metacpan'})
|
|
64
|
6 |
5 |
if $self->_maybe_index_from_metacpan($index, $archive_file)
|
|
98
|
0 |
5 |
unless -f $mfile
|
|
100
|
5 |
0 |
if $meta and $meta->{'provides'}
|
|
102
|
0 |
0 |
if ($@)
|
|
114
|
0 |
0 |
if $provides
|
|
125
|
5 |
6 |
unless $self->{'metacpan'}
|
|
130
|
0 |
6 |
unless (exists $lookup->{'archive'}{$archive})
|
|
137
|
0 |
6 |
unless ($provides and keys %{$provides;})
|
|
153
|
0 |
5 |
unless @{$files;}
|
|
183
|
0 |
6 |
unless @file_search
|
|
188
|
0 |
61 |
unless my $module = $file->module
|
|
189
|
61 |
0 |
XXX ? :
|
|
190
|
0 |
61 |
unless $inner->{'indexed'}
|
|
211
|
5 |
7 |
$no_compress ? :
|
|
218
|
5 |
7 |
if ($no_compress) { }
|
|
223
|
0 |
7 |
unless 'IO::Zlib'->new($pkgfname, 'w')
|
|
235
|
3 |
9 |
unless -d $authors_dir
|
|
241
|
51 |
11 |
unless /
|