File Coverage

blib/lib/PerlBean/Attribute/Single.pm
Criterion Covered Total %
statement 231 231 100.0
branch 75 90 83.3
condition 8 15 53.3
subroutine 35 35 100.0
pod 15 25 60.0
total 364 396 91.9


line stmt bran cond sub pod time code
1             package PerlBean::Attribute::Single;
2              
3 10     10   207 use 5.005;
  10         36  
  10         423  
4 10     10   56 use base qw( PerlBean::Attribute );
  10         17  
  10         5381  
5 10     10   70 use strict;
  10         18  
  10         336  
6 10     10   59 use warnings;
  10         18  
  10         422  
7 10     10   48 use AutoLoader qw(AUTOLOAD);
  10         19  
  10         68  
8 10     10   354 use Error qw(:try);
  10         23  
  10         101  
9 10     10   4382 use PerlBean::Method;
  10         22  
  10         279  
10 10     10   53 use PerlBean::Style qw(:codegen);
  10         21  
  10         2364  
11              
12             # Used by _initialize
13             our %DEFAULT_VALUE = (
14             'allow_empty' => 1,
15             );
16              
17             # Package version
18             our ($VERSION) = '$Revision: 1.0 $' =~ /\$Revision:\s+([^\s]+)/;
19              
20             1;
21              
22             __END__