File Coverage

blib/lib/DMTF/CIM/Instance/Method/Parameter.pm
Criterion Covered Total %
statement 12 16 75.0
branch n/a
condition n/a
subroutine 4 5 80.0
pod 1 1 100.0
total 17 22 77.2


line stmt bran cond sub pod time code
1             package DMTF::CIM::Instance::Method::Parameter;
2              
3 1     1   5 use warnings;
  1         3  
  1         33  
4 1     1   6 use strict;
  1         1  
  1         25  
5              
6 1     1   5 use version;
  1         1  
  1         5  
7             our $VERSION = qv('0.04');
8             require DMTF::CIM::_model;
9 1     1   80 use Carp;
  1         1  
  1         153  
10              
11             our @ISA=qw(DMTF::CIM::_valued);
12              
13             # Module implementation here
14             sub new
15             {
16 0     0 1   my $class=shift;
17 0           my %args=@_;
18 0           my $self=DMTF::CIM::_valued::new($class,parent=>$args{parent},data=>$args{parameter},value=>$args{value});
19 0           return($self);
20             }
21              
22             1; # Magic true value required at end of module
23             __END__