File Coverage

lib/Rex/Inventory/DMIDecode/MemoryArray.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition 1 3 33.3
subroutine 5 5 100.0
pod 0 1 0.0
total 22 25 88.0


line stmt bran cond sub pod time code
1             #
2             # (c) Jan Gehring
3             #
4              
5             package Rex::Inventory::DMIDecode::MemoryArray;
6              
7 39     39   546 use v5.12.5;
  39         146  
8 39     39   226 use warnings;
  39         84  
  39         1728  
9              
10             our $VERSION = '1.14.2.2'; # TRIAL VERSION
11              
12 39     39   254 use Rex::Inventory::DMIDecode::Section;
  39         86  
  39         1984  
13 39     39   283 use base qw(Rex::Inventory::DMIDecode::Section);
  39         84  
  39         7475  
14              
15             __PACKAGE__->section("Physical Memory Array");
16              
17             __PACKAGE__->has(
18             [
19             'Number Of Devices',
20             'Error Correction Type',
21             'Maximum Capacity',
22             'Location',
23             ],
24             1
25             );
26              
27             sub new {
28 3     3 0 4 my $that = shift;
29 3   33     12 my $proto = ref($that) || $that;
30 3         11 my $self = $that->SUPER::new(@_);
31              
32 3         7 bless( $self, $proto );
33              
34 3         6 return $self;
35             }
36              
37             1;