Condition Coverage

blib/lib/StorageDisplay/Collect.pm
Criterion Covered Total %
condition 54 119 45.3


and 3 conditions

line !l l&&!r l&&r condition
287 0 0 0 $_[0]->is_int and $_[0]->beq($_[0]->numify)
459 0 0 0 builtin::blessed($reader) and $reader->isa("StorageDisplay::Collect::CMD")
891 61 0 47 ($lsblk_info->{'type'} // "") eq "loop" and ($lsblk_info->{'size'} // 0) == 0
904 43 7 0 ($udev_info->{'_udev_infos'}{'ID_PART_TABLE_TYPE'} // "") eq "dos" and ($udev_info->{'_udev_infos'}{'ID_PART_ENTRY_NUMBER'} // "") ne ""
50 0 0 ($udev_info->{'_udev_infos'}{'ID_PART_TABLE_TYPE'} // "") eq "dos" and ($udev_info->{'_udev_infos'}{'ID_PART_ENTRY_NUMBER'} // "") ne "" and ($udev_info->{'_udev_infos'}{'DM_TYPE'} // "") eq "raid"
1366 0 0 23 not $container and $line =~ /^\s*([0-9]+)\s+([0-9]+)\s+([0-9]+)\s+([0-9-]+)\s+([^\s].*[^\s])\s+([^\s]+)$/
0 0 0 $container and $line =~ /^\s*(-)\s+([0-9]+)\s+([0-9]+)\s+(-)\s+([^\s]+)$/
1866 14 0 0 $curdisk ne "" and not $line =~ /^disk\.$curdisk\./
1867 0 0 0 exists $curdiskinfo->{'name'} and exists $curdiskinfo->{'alias'}

or 2 conditions

line l !l condition
81 7 0 shift() // "Local"
457 0 0 $args{'recorder-args-pass'} // {}
615 96 84 $self->{'_attr_depends'}{$kind} // []
632 0 5 shift() // {}
646 21 70 $infos->{'requires'} // []
647 91 0 $infos->{'provides'} // []
648 91 0 $infos->{'depends'} // {}
876 0 7 shift() // {}
883 233 0 $udev_info->{'_udev_infos'}{'DEVTYPE'} // ""
886 50 112 $udev_info->{'_udev_infos'}{'ID_PART_TABLE_TYPE'} // ""
887 112 0 $lsblk_info->{'rm'} // 0
891 108 0 $lsblk_info->{'type'} // ""
47 0 $lsblk_info->{'size'} // 0
896 61 0 $lsblk_info->{'type'} // ""
904 50 0 $udev_info->{'_udev_infos'}{'ID_PART_TABLE_TYPE'} // ""
0 7 $udev_info->{'_udev_infos'}{'ID_PART_ENTRY_NUMBER'} // ""
0 0 $udev_info->{'_udev_infos'}{'DM_TYPE'} // ""
929 50 16 $udev_info->{'_udev_infos'}{'ID_PART_TABLE_TYPE'} // ""
1035 35 0 shift() // {}
1040 296 0 $data->{'vg_name'} // die("no vg_name in data!")
1238 0 5 shift() // {}
1245 89 113 $udev_info->{'_udev_infos'}{'ID_FS_TYPE'} // ""
1265 67 0 $_->{'DM_SUBSYSTEM'} // ""
1326 0 5 shift() // [$self->select($infos)]
1404 0 1 shift() // {}
1444 0 0 shift() // {}
1633 0 1 shift() // {}
1656 0 0 shift() // {}
1762 1 0 &$get_cur_disk() // (next)
1771 10 0 &$get_cur_disk() // (next)
1775 10 0 &$get_cur_disk() // (next)
1800 0 6 shift() // {}
1838 106 0 $info[0] // ""
1859 14 21 $v->{'state'} // Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.42.0/B/Deparse.pm line 5762.
1925 0 7 shift() // {}
1995 0 7 shift() // {}
2059 0 0 shift() // "Local"

or 3 conditions

line l !l&&r !l&&!r condition
1433 0 0 0 $state != 0 or $nodata != 1
1476 0 0 0 $line eq "SAS2IRCU: Command DISPLAY Completed Successfully." or $line eq "SAS2IRCU: Utility Completed Successfully."
1505 1 1 87 $line =~ /^(Controller) information$/ or $line =~ /^(Enclosure) information$/
1 1 85 $line =~ /^IR (Volume) information$/ or $line =~ /^Physical (device) information$/
1574 4 62 0 $name{$k} // $k
1755 0 0 10 defined $cur_slot or not defined $cur_enc