Branch Coverage

blib/lib/LedgerSMB/Installer/OS/linux/debian.pm
Criterion Covered Total %
branch 0 40 0.0


line true false branch
34 0 0 unless (state $init = 0)
36 0 0 unless system($self->{'cmd'}{'apt-file'}, "update") == 0
42 0 0 unless open my $fh, "-|", "$self->{'cmd'}{'dh-make-perl'} --no-verbose locate $args 2>/dev/null"
49 0 0 if ($pkg_line =~ /^(\S+) is not found in any/u) { }
0 0 elsif ($pkg_line =~ /^(\S+) is in (\S+)(?: \| \S+)* package/u) { }
0 0 elsif ($pkg_line =~ /^(\S+) is in Perl core/u) { }
69 0 0 if (@skipped)
88 0 0 unless system(@cmd) == 0
96 0 0 unless system(@cmd) == 0
109 0 0 unless system(@cmd) == 0
122 0 0 unless (grep {/build-essential/u;} split(/\n/u, $have_build_essential, 0))
133 0 0 unless (grep {/tar/u;} split(/\n/u, $have_deps, 0))
136 0 0 unless (grep {/gzip/u;} split(/\n/u, $have_deps, 0))
139 0 0 if ($config->verify_sig)
140 0 0 unless (grep {/gpg/u;} split(/\n/u, $have_deps, 0))
144 0 0 if (@pkgs)
155 0 0 unless (grep {/make/u;} split(/\n/u, $have_make, 0))
167 0 0 unless (grep {/dh-make-perl/u;} split(/\n/u, $have_dh_make_perl, 0))
173 0 0 unless (grep {/apt-file/u;} split(/\n/u, $have_apt_file, 0))
176 0 0 if ($config->effective_prepare_env)