File Coverage

gen/attr-PerlBean_Method_Factory.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   4 use strict;
  1         1  
  1         109  
2              
3             my $pkg = 'PerlBean::Method::Factory';
4              
5             push(@::bean_desc, {
6             bean_opt => {
7             abstract => 'Abstract PerlBean method factory information',
8             package => $pkg,
9             use_perl_version => 5.005,
10             description => <
11             C<${pkg}> abstract class for method factory information.
12             EOF
13             short_description => 'contains bean method factory information',
14             synopsis => "None. This is an abstract class.\n",
15             },
16             attr_opt => [
17             {
18             method_factory_name => 'method_factory_name',
19             type => 'SINGLE',
20             mandatory => 1,
21             allow_empty => 0,
22             allow_rx => [qw(^\w+$)],
23             short_description => 'method factory\'s name',
24             },
25             {
26             method_factory_name => 'perl_bean',
27             type => 'SINGLE',
28             allow_isa => [qw(PerlBean)],
29             short_description => 'the PerlBean to which this method factory belongs',
30             },
31             ],
32             meth_opt => [
33             {
34             method_name => 'create_methods',
35             description => <
36             Returns a list of C objects.
37             EOF
38             interface => 1,
39             },
40             ],
41             use_opt => [
42             ],
43             } );
44              
45             1;