Branch Coverage

blib/lib/Parse/Arcconf.pm
Criterion Covered Total %
branch 1 58 1.7


line true false branch
99 0 0 if (open $fh, $command)
119 0 1 if (open $fh, '<' . $file)
151 0 0 if $line =~ /^$/
152 0 0 if $line =~ /^-+$/
154 0 0 if ($line =~ /^Controllers found: (\d+)$/)
158 0 0 if ($line =~ /^Controller information/)
168 0 0 if ($line =~ /^\s+(.*\w)\s+:\s+(.*)$/) { }
0 0 elsif ($line =~ /^\s+-+$/) { }
176 0 0 if ($line =~ /^\s+-+$/)
180 0 0 if ($line =~ /^\s+(.*\w)\s*/)
186 0 0 if ($line =~ /^\s+(.*\w)\s+:\s+(.*)$/) { }
0 0 elsif ($line =~ /^\s+-+$/) { }
0 0 elsif ($line =~ /^$/) { }
198 0 0 unless defined $current_controller
200 0 0 if ($line =~ /^Logical drive information/ or $line =~ /^Logical device information/)
204 0 0 if ($line =~ /^\S+.*\w\s+(\d+)$/) { }
0 0 elsif ($line =~ /^\s+(\S.*\S+)\s+:\s+(.*)$/) { }
0 0 elsif ($line =~ /^\s+-+$/) { }
215 0 0 if ($line =~ /^\s+(\S.*\S+)\s+:\s+(.*)$/) { }
0 0 elsif ($line =~ /^\S+.*\w\s+(\d+)$/) { }
0 0 elsif ($line =~ /^-+$/) { }
0 0 elsif ($line =~ /^\s+-+$/) { }
230 0 0 if ($line =~ /^Physical Device information/)
233 0 0 if ($line =~ /^\s+-+$/)
237 0 0 if ($line =~ /^\s+Device\s+#(\d+)$/) { }
0 0 elsif ($line =~ /^\s+Device is (.*\w)/) { }
0 0 elsif ($line =~ /^\s+(.*\w)\s+:\s+(.*)$/) { }
0 0 elsif ($line =~ /^\s+-+$/) { }
0 0 elsif ($line =~ /^$/) { }