Branch Coverage

blib/lib/Parse/HP/ACU.pm
Criterion Covered Total %
branch 0 58 0.0


line true false branch
97 0 0 if (open $fh, $command)
117 0 0 if (open $fh, '<' . $file)
148 0 0 if $line =~ /^$/
150 0 0 unless ($line =~ /^[ ]+/)
163 0 0 unless defined $current_controller
169 0 0 if ($line =~ /unassigned/)
182 0 0 if ($line =~ /Array: ([A-Z]+)/)
199 0 0 if ($line =~ /Logical Drive: ([0-9]+)/)
214 0 0 if ($line =~ /physicaldrive ([0-9IC:]+)/ and not $line =~ /port/)
219 0 0 if ($current_array eq 'unassigned') { }
232 0 0 if ($line =~ /Mirror Group ([0-9]+):/)
242 0 0 if (defined $current_array and defined $current_logical_drive and defined $current_mirror_group)
246 0 0 if ($line =~ /physicaldrive ([0-9IC:]+) \(/)
255 0 0 if $pd eq $1
262 0 0 if (defined $current_array and defined $current_logical_drive)
265 0 0 if (my($k, $v) = &K_V($line))
267 0 0 unless defined $k
275 0 0 if (defined $current_array and defined $current_physical_drive)
278 0 0 if (my($k, $v) = &K_V($line))
280 0 0 unless defined $k
281 0 0 if ($current_array eq 'unassigned') { }
295 0 0 if (defined $current_array)
297 0 0 if (my($k, $v) = &K_V($line))
299 0 0 unless defined $k
306 0 0 if (my($k, $v) = &K_V($line))
308 0 0 unless defined $k
332 0 0 if ($k eq 'accelerator_ratio')
334 0 0 if ($v =~ m[([0-9]+)% Read / ([0-9]+)% Write])
347 0 0 if ($line =~ /(.+):\s+(.+)/)