File Coverage

blib/lib/DataCube/Cube/Style.pm
Criterion Covered Total %
statement 6 8 75.0
branch n/a
condition 0 3 0.0
subroutine 2 3 66.6
pod 0 1 0.0
total 8 15 53.3


line stmt bran cond sub pod time code
1              
2              
3              
4             package DataCube::Cube::Style;
5              
6 1     1   4 use strict;
  1         23  
  1         28  
7 1     1   4 use warnings;
  1         2  
  1         154  
8              
9             sub new {
10 0     0 0   my($class,%opts) = @_;
11 0   0       bless { %opts }, ref($class) || $class;
12             }
13              
14              
15              
16              
17              
18             1;
19              
20              
21             __DATA__