File Coverage

blib/lib/PerlBean/Described/ExportTag.pm
Criterion Covered Total %
statement 42 50 84.0
branch 9 28 32.1
condition 7 24 29.1
subroutine 10 10 100.0
pod 2 2 100.0
total 70 114 61.4


line stmt bran cond sub pod time code
1             package PerlBean::Described::ExportTag;
2              
3 1     1   19 use 5.005;
  1         4  
  1         49  
4 1     1   5 use base qw( PerlBean::Described );
  1         1  
  1         543  
5 1     1   5 use strict;
  1         2  
  1         23  
6 1     1   4 use warnings;
  1         3  
  1         22  
7 1     1   5 use AutoLoader qw(AUTOLOAD);
  1         2  
  1         4  
8 1     1   34 use Error qw(:try);
  1         2  
  1         94  
9              
10             # Used by _value_is_allowed
11             our %ALLOW_ISA = (
12             );
13              
14             # Used by _value_is_allowed
15             our %ALLOW_REF = (
16             );
17              
18             # Used by _value_is_allowed
19             our %ALLOW_RX = (
20             'export_tag_name' => [ '^\w+$' ],
21             );
22              
23             # Used by _value_is_allowed
24             our %ALLOW_VALUE = (
25             );
26              
27             # Package version
28             our ($VERSION) = '$Revision: 1.0 $' =~ /\$Revision:\s+([^\s]+)/;
29              
30             1;
31              
32             __END__