File Coverage

blib/lib/Text/PageLayout/PageElements.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Text::PageLayout::PageElements;
2              
3 4     4   41174 use 5.010;
  4         13  
  4         168  
4 4     4   22 use strict;
  4         9  
  4         132  
5 4     4   20 use warnings;
  4         7  
  4         105  
6 4     4   22 use utf8;
  4         7  
  4         29  
7              
8 4     4   111 use Moo::Role;
  4         7  
  4         27  
9              
10             has header => (
11             is => 'ro',
12             default => sub { '' },
13             );
14             has footer => (
15             is => 'rw',
16             default => sub { '' },
17             );
18             has paragraphs => (
19             is => 'rw',
20             required => 1,
21             );
22             has separator => (
23             is => 'rw',
24             default => sub { "\n" },
25             );
26             has process_template => (
27             is => 'rw',
28             default => sub { sub { my %param = @_; return $param{template} } },
29             );
30              
31              
32             1;