| line |
true |
false |
branch |
|
47
|
0 |
19 |
if $TiedObj |
|
55
|
0 |
19 |
unless $TiedObj |
|
63
|
8 |
2 |
if ref $_[0] and $_[0]->isa('CPANPLUS::Configure') |
|
75
|
0 |
10 |
if glob catfile($conf->get_conf('base'), $conf->_get_source('stored') . '*' . '.stored') |
|
82
|
10 |
0 |
unless (defined $ENV{'MAILDOMAIN'}) |
|
84
|
0 |
10 |
$hostpart =~ /^(cpan\.org|gmail\.com)$/i ? : |
|
87
|
10 |
0 |
if ($^V gt v5.9.5) { } |
|
92
|
0 |
0 |
unless $@ |
|
101
|
3 |
7 |
if (-r $config_file) |
|
105
|
1 |
2 |
if (@list) |
|
112
|
2 |
1 |
if (@list) |
|
133
|
5 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
142
|
0 |
5 |
unless (@dists) |
|
150
|
0 |
5 |
unless $mod |
|
153
|
0 |
5 |
if $self->_is_excluded_dist($package) |
|
154
|
0 |
5 |
if $mod->is_bundle |
|
155
|
0 |
5 |
unless $grade =~ /$self->{'allow_retries'}/ |
|
163
|
0 |
5 |
if ($self->{'local_lib'}) |
|
182
|
0 |
5 |
if ($self->{'local_lib'}) |
|
185
|
0 |
0 |
if -e $build_dir |
|
189
|
5 |
0 |
unless $self->{'local_lib'} |
|
197
|
14 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
207
|
4 |
10 |
if ($grade) { } |
|
209
|
0 |
4 |
unless $mod |
|
211
|
0 |
4 |
unless ($grade =~ /(pass|fail|unknown|na|none|ungraded|aborted|ignored)/) |
|
214
|
0 |
4 |
if ($grade eq 'none') |
|
222
|
10 |
0 |
$distver ? : |
|
225
|
0 |
10 |
unless $mod |
|
227
|
0 |
10 |
if $self->_is_excluded_dist($dist_ver) |
|
229
|
8 |
2 |
if ($grade) { } |
|
238
|
14 |
0 |
if $distver |
|
244
|
2 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
252
|
0 |
2 |
unless (@dists) |
|
260
|
0 |
2 |
unless $mod |
|
263
|
0 |
2 |
unless $self->_is_excluded_dist($package) or $self->_is_excluded_auth($auth) |
|
274
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
279
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
286
|
0 |
0 |
if (@_) { } |
|
289
|
0 |
0 |
unless /^(.*)\-(.+)$/ |
|
295
|
0 |
0 |
unless /^(.*)\-(.+)$/ |
|
305
|
0 |
0 |
if ($passed) { } |
|
|
0 |
0 |
elsif ($self->{'checked'}{"$dist-$vers"} eq 'pass') { } |
|
310
|
0 |
0 |
if ($flush) |
|
313
|
0 |
0 |
if -d $builddir |
|
329
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
334
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
341
|
0 |
0 |
if ($param eq 'old') { } |
|
345
|
0 |
0 |
if $dir =~ /^\.+$/ |
|
359
|
0 |
0 |
if -e $build_dir |
|
376
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
384
|
0 |
0 |
if glob catfile($self->{'conf'}->get_conf('base'), $self->{'conf'}->_get_source('stored') . '*' . '.stored') |
|
391
|
15 |
2 |
unless $self->{'exclude_dists'} |
|
392
|
1 |
1 |
if $dist =~ $self->{'exclude_dists'}->re |
|
398
|
0 |
1 |
unless $self->{'exclude_auths'} |
|
399
|
1 |
0 |
if $auth =~ $self->{'exclude_auths'}->re |
|
428
|
0 |
0 |
if $status |
|
432
|
0 |
0 |
if @$hosts == $h_ind |
|
435
|
0 |
0 |
unless my $fh = 'IO::File'->new($local) |
|
438
|
0 |
0 |
unless /^authors/ |
|
439
|
0 |
0 |
unless /\.(?:tar\.(?:bz2|gz|Z)|t(?:gz|bz)|(?
|
|
459
|
0 |
1 |
unless $self->{'local_lib'} |