Branch Coverage

blib/lib/Sys/Info/Driver/Linux/OS/Distribution.pm
Criterion Covered Total %
branch 38 102 37.2


line true false branch
37 0 2 if (@_)
38 0 0 if @_ % 2
73 0 1 unless exists $slot->{'manufacturer'}
79 0 2 if $self->{'RESULTS'}
92 2 0 if $distro
102 0 0 if (-f $file and not -l $file)
117 0 0 unless ($dist_id or $self->name)
120 0 0 if $release
128 0 2 exists $slot->{'version_match'} ? :
133 0 0 ref $slot->{'release'} eq 'ARRAY' ? :
0 2 $slot->{'release'} ? :
135 0 2 if $slot_release
151 2 0 if (my $dn = $self->name) { }
157 2 0 unless $dn =~ /Linux/imsx
173 2 0 if (exists $slot->{'edition'})
175 0 2 if ($this_ve) { }
0 2 elsif (my $this_ie = $slot->{'edition'}{$int_version}) { }
186 2 0 unless ($edition)
187 0 2 if ($version and not $version =~ /[0-9]/msx) { }
188 0 0 if ($name =~ /debian/imsx)
190 0 0 if (my $test = $Sys::Info::Driver::Linux::OS::Distribution::CONF{'debian'}{'vfix'}{lc $buf[0]})
198 0 0 if ($slot->{'use_codename_for_edition'} and $self->{'DISTRIB_CODENAME'})
202 0 0 unless $cn =~ /[0-9]/msx
214 2 0 if (-e {"cpuinfo" => "/proc/cpuinfo","fstab" => "/etc/fstab","issue" => "/etc/issue","loadavg" => "/proc/loadavg","meminfo" => "/proc/meminfo","resolv" => "/etc/resolv.conf","scaling_cur_freq" => "/sys/devices/system/cpu/cpu0/cpufreq/scaling_cur_freq","swaps" => "/proc/swaps","timezone" => "/etc/localtime","timezone_old" => "/etc/timezone","uptime" => "/proc/uptime","version" => "/proc/version"}->{'version'} and -f _)
228 0 2 unless $build_date
230 2 0 if ($str =~ /
232 2 0 if ($distro = $self->trim($2))
233 0 2 if ($distro =~ / \s\((.+?)\)\) \z /msx)
239 0 2 if not $distro or $distro =~ /\(gcc/msx
242 2 0 if $build_date
243 2 0 $build_date ? :
270 4 0 if ($rfile) { }
274 4 0 if $info
279 0 0 if (-d $dir)
281 0 0 m[$dir/(.*)]msx ? :
284 0 0 if $rv
287 0 0 if (my(@files) = glob($self->{'etc_dir'} . '/*release'))
291 0 0 if ($real)
300 0 0 unless $release
305 0 0 if $codename
314 0 0 if ($self->{'DISTRIB_ID'} and $self->{'DISTRIB_ID'} eq "redhat" and $self->{'DISTRIB_NAME'} and index($self->{'DISTRIB_NAME'}, "CentOS") != -1)
322 0 0 if $self->{$field}
335 0 6 unless $FH->open($file, "<")
337 0 6 unless $FH->close
340 2 2 $self->{'pattern'} =~ / \A DISTRIB_RELEASE \b /msx ? :
2 4 $self->{'pattern'} =~ / \A DISTRIB_ID \b /msx ? :
345 0 14 unless $line
349 4 10 if ($info) { }
2 8 elsif ($new_pattern) { }
356 0 2 if ($info2)
363 4 2 if ($rv)