File Coverage

gen/syn-PerlBean_Attribute_Factory.pl
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1 1     1   726 use strict;
  1         2  
  1         44  
2 1     1   608 use PerlBean::Attribute::Factory;
  1         4  
  1         72  
3             my $factory = PerlBean::Attribute::Factory->new();
4             my $attr = $factory->create_attribute( {
5             type => 'BOOLEAN',
6             method_factory_name => 'true',
7             short_description => 'something is true',
8             } );
9             1;