File Coverage

blib/lib/Sub/Attribute.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 19 19 100.0


line stmt bran cond sub pod time code
1             package Sub::Attribute;
2              
3 11     11   482716 use 5.008_001;
  11         34  
4 11     11   50 use strict;
  11         17  
  11         323  
5              
6             our $VERSION = '0.06_01';
7              
8 11     11   48 use XSLoader;
  11         17  
  11         331  
9             XSLoader::load(__PACKAGE__, $VERSION);
10              
11 11     11   2306 use parent qw(Exporter);
  11         2311  
  11         48  
12             our @EXPORT = qw(ATTR_SUB MODIFY_CODE_ATTRIBUTES);
13              
14 11     11   3780 use attributes ();
  11         10202  
  11         227  
15              
16             1;
17             __END__