File Coverage

MyTest/HasAttrs.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package MyTest::HasAttrs;
2              
3 2     2   24630 use strict;
  2         2  
  2         74  
4              
5 2     2   9 use base qw/Class::XML/;
  2         3  
  2         1184  
6              
7             __PACKAGE__->has_attributes(qw/length colour/);
8             __PACKAGE__->has_attribute('flavour');
9              
10             1;