File Coverage

gen/attr-PerlBean_Described.pl
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1 1     1   5 use strict;
  1         2  
  1         68  
2              
3             push(@::bean_desc, {
4             bean_opt => {
5             abstract => 'Generic described object',
6             package => 'PerlBean::Described',
7             use_perl_version => 5.005,
8             description => <
9             C is a generic abstract class to be inherited by objects that need to be described.
10             EOF
11             short_description => 'Generic described',
12             synopsis => "None, this is an abstract class.\n",
13             },
14             attr_opt => [
15             {
16             method_factory_name => 'description',
17             short_description => 'the description',
18             },
19             ],
20             } );
21              
22             1;