Branch Coverage

blib/lib/CPANPLUS/Dist/Gentoo.pm
Criterion Covered Total %
branch 0 144 0.0


line true false branch
226 0 0 if defined $format_available
228 0 0 unless ('IPC::Cmd'->can_capture_buffer)
230 0 0 unless (do { local $@; eval { do { require IPC::Run; 1 } } })
238 0 0 unless (IPC::Cmd::can_run($prog))
251 0 0 if ($success) { }
252 0 0 if ($buffers =~ /^PORTDIR_OVERLAY=(.*)$/m)
255 0 0 if ($buffers =~ /^ACCEPT_KEYWORDS=(.*)$/m)
258 0 0 if ($buffers =~ /^DISTDIR=(.*)$/m)
261 0 0 if ($buffers =~ /^PORTDIR=(.*)$/m)
270 0 0 unless defined $default_keywords
271 0 0 unless defined $default_distdir
276 0 0 if (defined $timestamp) { }
282 0 0 if ($timestamp < 1339737301)
340 0 0 if @_
341 0 0 if @_
344 0 0 if (defined $keywords) { }
352 0 0 unless defined $manifest
353 0 0 if $manifest =~ /^\s*no?\s*$/i
357 0 0 if (defined $header) { }
371 0 0 if (defined $footer) { }
379 0 0 if (defined $overlay) { }
383 0 0 unless defined $overlay
388 0 0 defined $distdir ? :
391 0 0 if $stat->do_manifest and not -w $distdir
398 0 0 if ($_ eq $overlay or 'File::Spec'->abs2rel($overlay, $_) eq $cur)
403 0 0 unless $portdir_overlay
433 0 0 if ($stat->force) { }
435 0 0 if ($forced{$file})
440 0 0 if (-e $file)
441 0 0 unless (-w $file)
448 0 0 if (my $atom = $self->_cpan2portage($name, $version))
458 0 0 unless $stat->prepared
461 0 0 unless $desc
462 0 0 unless $desc
464 0 0 if length $desc > 80
469 0 0 unless $author =~ /^(.)(.)/
501 0 0 if defined $meta
507 0 0 unless -e $meta_file
511 0 0 if (defined $meta)
540 0 0 if (defined $dslip and $dslip =~ /\S{4}(\S)/)
542 0 0 if @licenses
547 0 0 if (defined $license)
549 0 0 if @licenses
562 0 0 if (defined $file and -e $file and -w _)
569 0 0 if ($SIG_INT)
572 0 0 if $@
580 0 0 if defined $file
587 0 0 if @_
591 0 0 unless ($stat->prepared)
597 0 0 if ($stat->created)
604 0 0 unless (-d $dir)
606 0 0 if $@
613 0 0 unless open my $eb, '>', $file
622 0 0 unless $stat->created
625 0 0 unless open my $eb, '>', $file
627 0 0 unless defined $source
631 0 0 if $stat->do_manifest and not $self->update_manifest
647 0 0 unless (defined $file and -e $file)
651 0 0 unless (File::Copy::copy($stat->fetched_arch, $stat->distdir))
694 0 0 if (%recursive_kids)
697 0 0 if ($recursive_kids{$$_[0]}) { }
731 0 0 unless (defined $atom)
754 0 0 if @requires
755 0 0 if @recursive_requires
773 0 0 $category eq 'virtual' ? :
776 0 0 unless my(@ebuilds) = glob('File::Spec'->catfile($portdir, $category, $name, "$name-*.ebuild"))
783 0 0 $a < $b ? :
786 0 0 if defined $version and $last < $version
808 0 0 if $sudo
823 0 0 if $sudo
844 0 0 unless ($success)
846 0 0 if (not $verbose and defined $output and $stat->verbose)