Branch Coverage

blib/lib/Slackware/Slackget/Base.pm
Criterion Covered Total %
branch 0 50 0.0


line true false branch
49 0 0 if not defined $config or ref $config ne 'Slackware::Slackget::Config'
79 0 0 unless (opendir DIR, $dir)
88 0 0 unless ($files[$k] =~ /^(\.\.|\.)$/)
112 0 0 if (not -d $a || -l $a) { }
120 0 0 unless (-l $a)
152 0 0 if ($packagelist)
159 0 0 if (defined $p and -e $$self{'CONF'}{'common'}{'packages-history-dir'} . '/' . $p->get_id)
169 0 0 unless $packagelist
170 0 0 if (scalar @files < 1)
193 0 0 unless (defined $packagelist->get_indexed($1))
197 0 0 unless $sg_file
202 0 0 unless $$ref{$1}
208 0 0 unless defined $file[$k]
209 0 0 if ($file[$k] =~ /^PACKAGE NAME:\s+(.*)$/) { }
0 0 elsif ($file[$k] =~ /^COMPRESSED PACKAGE SIZE:\s+(.*) K$/) { }
0 0 elsif ($file[$k] =~ /^UNCOMPRESSED PACKAGE SIZE:\s+(.*) K$/) { }
0 0 elsif ($file[$k] =~ /^PACKAGE LOCATION:\s+(.*) K$/) { }
0 0 elsif ($file[$k] =~ /PACKAGE DESCRIPTION:/) { }
212 0 0 unless (defined $pack->getValue('name') or defined $pack->getValue('version') or defined $pack->getValue('architecture') or defined $pack->getValue('package-version'))
242 0 0 if not defined $file[$k] or $file[$k] =~ m[^\./]
243 0 0 unless $file[$k] =~ /FILE\s*LIST\s*:\s*/
252 0 0 if (defined $$self{'include-file-list'})
281 0 0 if ($pg_idx == $mark)
360 0 0 if ($key eq 'date') { }
446 0 0 if ($l =~ /^\s*([^\s]*)\s*=>.*/)