File Coverage

blib/lib/Tree/FromStruct.pm
Criterion Covered Total %
statement 6 6 100.0
branch 1 2 50.0
condition n/a
subroutine 2 2 100.0
pod 1 1 100.0
total 10 11 90.9


line stmt bran cond sub pod time code
1             package Tree::FromStruct;
2              
3             our $DATE = '2016-03-23'; # DATE
4             our $VERSION = '0.01'; # VERSION
5              
6             require Code::Includable::Tree::FromStruct;
7              
8 1     1   19508 use Exporter qw(import);
  1         2  
  1         139  
9             our @EXPORT_OK = qw(build_tree_from_struct);
10              
11             sub build_tree_from_struct {
12 1     1 1 15 my $struct = shift;
13              
14 1 50       4 my $class = $struct->{_class} or die "Please specify _class in struct";
15 1         5 Code::Includable::Tree::FromStruct::new_from_struct($class, $struct);
16             }
17              
18             1;
19             # ABSTRACT: Build a tree object from hash structure
20              
21             __END__