| line |
true |
false |
branch |
|
47
|
0 |
23 |
if $TiedObj |
|
55
|
0 |
23 |
unless $TiedObj |
|
63
|
10 |
2 |
if ref $_[0] and $_[0]->isa('CPANPLUS::Configure') |
|
75
|
0 |
12 |
if glob catfile($conf->get_conf('base'), $conf->_get_source('stored') . '*' . '.stored') |
|
82
|
12 |
0 |
unless (defined $ENV{'MAILDOMAIN'}) |
|
84
|
0 |
12 |
$hostpart =~ /^(cpan\.org|gmail\.com)$/i ? : |
|
87
|
12 |
0 |
if ($^V gt v5.9.5) { } |
|
92
|
0 |
0 |
unless $@ |
|
101
|
3 |
9 |
if (-r $config_file) |
|
105
|
1 |
2 |
if (@list) |
|
112
|
2 |
1 |
if (@list) |
|
133
|
7 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
142
|
0 |
7 |
unless (@dists) |
|
150
|
0 |
7 |
unless $mod |
|
153
|
0 |
7 |
if $self->_is_excluded_dist($package) |
|
154
|
0 |
7 |
if $mod->is_bundle |
|
155
|
0 |
7 |
unless $grade =~ /$self->{'allow_retries'}/ |
|
163
|
0 |
7 |
if ($self->{'local_lib'}) |
|
184
|
0 |
7 |
if ($self->{'local_lib'}) |
|
187
|
0 |
0 |
if -e $build_dir |
|
191
|
7 |
0 |
unless $self->{'local_lib'} |
|
199
|
16 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
209
|
4 |
12 |
if ($grade) { } |
|
211
|
0 |
4 |
unless $mod |
|
213
|
0 |
4 |
unless ($grade =~ /(pass|fail|unknown|na|none|ungraded|aborted|ignored)/) |
|
216
|
0 |
4 |
if ($grade eq 'none') |
|
224
|
12 |
0 |
$distver ? : |
|
227
|
0 |
12 |
unless $mod |
|
229
|
0 |
12 |
if $self->_is_excluded_dist($dist_ver) |
|
231
|
9 |
3 |
if ($grade) { } |
|
240
|
16 |
0 |
if $distver |
|
246
|
2 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
254
|
0 |
2 |
unless (@dists) |
|
262
|
0 |
2 |
unless $mod |
|
265
|
0 |
2 |
unless $self->_is_excluded_dist($package) or $self->_is_excluded_auth($auth) |
|
276
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
281
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
288
|
0 |
0 |
if (@_) { } |
|
291
|
0 |
0 |
unless /^(.*)\-(.+)$/ |
|
297
|
0 |
0 |
unless /^(.*)\-(.+)$/ |
|
307
|
0 |
0 |
if ($passed) { } |
|
|
0 |
0 |
elsif ($self->{'checked'}{"$dist-$vers"} eq 'pass') { } |
|
312
|
0 |
0 |
if ($flush) |
|
315
|
0 |
0 |
if -d $builddir |
|
331
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
336
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
343
|
0 |
0 |
if ($param eq 'old') { } |
|
347
|
0 |
0 |
if $dir =~ /^\.+$/ |
|
361
|
0 |
0 |
if -e $build_dir |
|
378
|
0 |
0 |
if (ref $_[0] and $_[0]->isa('CPANPLUS::YACSmoke')) |
|
386
|
0 |
0 |
if glob catfile($self->{'conf'}->get_conf('base'), $self->{'conf'}->_get_source('stored') . '*' . '.stored') |
|
393
|
19 |
2 |
unless $self->{'exclude_dists'} |
|
394
|
1 |
1 |
if $dist =~ $self->{'exclude_dists'}->re |
|
400
|
0 |
1 |
unless $self->{'exclude_auths'} |
|
401
|
1 |
0 |
if $auth =~ $self->{'exclude_auths'}->re |
|
430
|
0 |
0 |
if $status |
|
434
|
0 |
0 |
if @$hosts == $h_ind |
|
437
|
0 |
0 |
unless my $fh = 'IO::File'->new($local) |
|
440
|
0 |
0 |
unless /^authors/ |
|
441
|
0 |
0 |
unless /\.(?:tar\.(?:bz2|gz|Z)|t(?:gz|bz)|(?
|
|
461
|
0 |
1 |
unless $self->{'local_lib'} |