File Coverage

blib/lib/Forest/Tree/Reader.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Forest::Tree::Reader;
2 10     10   22409 use Moose::Role;
  10         28  
  10         114  
3              
4             our $VERSION = '0.10';
5             our $AUTHORITY = 'cpan:STEVAN';
6              
7             with 'Forest::Tree::Loader';
8              
9             requires 'read';
10              
11             # satisfy the Loader interface here ...
12             sub load {
13 1     1 1 42 my $self = shift;
14 1         10 $self->read(@_);
15             }
16              
17 10     10   67696 no Moose::Role; 1;
  10         30  
  10         66  
18              
19             __END__
20              
21             =pod
22              
23             =head1 NAME
24              
25             Forest::Tree::Reader - An abstract role for top down tree reader
26              
27             =head1 DESCRIPTION
28              
29             B<This role should generally not be used, it has been largely superseded by Forest::Tree::Builder>.
30              
31             This is an abstract role for tree readers.
32              
33             Tree readers are also Tree loaders, that is why this module
34             also does the L<Forest::Tree::Loader> role.
35              
36             =head1 ATTRIBUTES
37              
38             =over 4
39              
40             =item I<tree>
41              
42             =back
43              
44             =head1 REQUIRED METHODS
45              
46             =over 4
47              
48             =item B<read>
49              
50             =back
51              
52             =head1 METHODS
53              
54             =over 4
55              
56             =item B<load>
57              
58             This satisfies the L<Forest::Tree::Loader> interface.
59              
60             =back
61              
62             =head1 BUGS
63              
64             All complex software has bugs lurking in it, and this module is no
65             exception. If you find a bug please either email me, or add the bug
66             to cpan-RT.
67              
68             =head1 AUTHOR
69              
70             Stevan Little E<lt>stevan.little@iinteractive.comE<gt>
71              
72             =head1 COPYRIGHT AND LICENSE
73              
74             Copyright 2008-2014 Infinity Interactive, Inc.
75              
76             L<http://www.iinteractive.com>
77              
78             This library is free software; you can redistribute it and/or modify
79             it under the same terms as Perl itself.
80              
81             =cut