File Coverage

blib/lib/PerlBean/Attribute/Multi/Ordered.pm
Criterion Covered Total %
statement 175 176 99.4
branch 42 44 95.4
condition n/a
subroutine 17 17 100.0
pod 1 10 10.0
total 235 247 95.1


line stmt bran cond sub pod time code
1             package PerlBean::Attribute::Multi::Ordered;
2              
3 4     4   817 use 5.005;
  4         14  
  4         192  
4 4     4   126 use base qw( PerlBean::Attribute::Multi );
  4         10  
  4         2445  
5 4     4   25 use strict;
  4         8  
  4         127  
6 4     4   21 use warnings;
  4         8  
  4         127  
7 4     4   21 use AutoLoader qw(AUTOLOAD);
  4         8  
  4         24  
8 4     4   149 use Error qw(:try);
  4         9  
  4         27  
9 4     4   625 use PerlBean::Style qw(:codegen);
  4         9  
  4         1000  
10              
11             # Package version
12             our ($VERSION) = '$Revision: 1.0 $' =~ /\$Revision:\s+([^\s]+)/;
13              
14             1;
15              
16             __END__